DTIC  TRAC 

UNANNOUNCED 

JUSTIFICATION 


LOAN  DOCUMENT 


PHOTOGRAPH  THIS  SHEET 


INVENTORY 


s\_-  -Q,\ 


DISTRIBUTION/ 

AVAILABILITY  CODES _ 

DISTRIBUTION  |  AVAILABILITY  AND/OR  SPECIAL 


DOCUMENT  IDENTIFICATION 


DISTRIBUTION  STATEMENT 


AA 


DATE  ACCESSIONED 


DISTRIBUTION  STAMP 


067 


DATE  RETURNED 


91-06506 


DATE  RECEIVED  IN  DTIC 


REGISTERED  OR  CERTIFIED  NUMBER 


PHOTOGRAPH  THIS  SHEET  AND  RETURN  TO  DTIC-KDAC 


DTIC  70A 

JvX  »o 


documimt  r*orrjjiNc  siif.kt 


LOAN  DOCUMENT 


STOCK  15  EXHAUSTED 


✓ 


WL-TR-9 1-8025 


AD-A239  000 

"  "  ... _ ........  .am  Hill  Mil  till 


PRODUCT  DEFINITION  DATA  INTERFACE  (PDDI) 

Access  Software  User's  Manual 

McDonnell  Aircraft  Company 
McDonnell  Douglas  Corporation 
P.  0.  Box  516 
St.  Louis,  M0  63166 


July  1991 


Final  report 


Approved  for  public  release;  distribution  is  unlimited. 


» 


MANUFACTURING  TECHNOLOGY  DIRECTORATE 

WRIGHT  LABORATORY 

AIR  FORCE  SYSTEMS  COMMAND 

WRIGHT-PATTERSON  AIR  FORCE  BASE,  OHIO  45433-6533 


NOTICE 


When  Government  drawings,  specifications,  or  other  data  are  used  for 
any  purpose  other  than  in  connection  with  a  definitely  Government-related 
procurement,  the  United  States  Government  incurs  no  responsibility  or  anv 
obligation  whatsoever.  The  fact  that  the  government  may  have  formulated  or 
in  any  way  supplied  the  said  drawings,  specifications,  or  other  data,  is  not 
to  be  regarded  by  implication,  or  otherwise  in  any  manner  construed,  as 
licensing  the  holder,  or  any  other  person  or  corporation;  or  as  conveying 
any  rights  or  permission  to  manufacture,  use,  or  sell  any  patented  invention 
that  may  in  any  way  be  related  thereto. 


This  report  is  releasable  to  the  National  Technical  Information  Service 
(NTIS).  At  NTIS,  it  will  be  available  to  the  general  public,  including 
foreign  nations. 


This  technical  report  has  been  reviewed  and  is  approved  for  publica¬ 
tion. 


i  / 

ULAi!  A  A 

ALAN  R.  WINN 
Project  Manager 


DATE 


FOR  THE  COMMANDER: 


BRUCE  A.  RASMUSSEN,  Chief 
Integration  Technology  Division 
Manufacturing  Technology  Directorate 


DATE 


If  your  address  has  changed,  if  you  wish  to  be  removed  from  our  mailing 
list,  or  if  the  addressee  is  no  longer  employed  by  your  organization  please 
notify  WL/MTIB  ,  WPAFB,  OH  45433-6533  to  help  us  maintain  a  current 
mailing  list. 


Copies  of  this  report  should  not  be  returned  unless  return  is  required  by 
security  considerations,  contractual  obligations,  or  notice  on  a  specific 
document. 


UNCLASSIFIED 


h^aa^^MaiHaMJuaaLHaj 


la.  REPORT  SECURITY  CLASSIFICATION 

UNCLASSIFIED 


2a.  SECURITY  CLASSIFICATION  AUTHORITY 
2b  OECLA55IFICATION  /  DOWNGRADING  SCHEDULE 
4.  PERFORMING  ORGANIZATION  REPORT  NUMBER(S) 


REPORT  DOCUMENTATION  PAGE 


tb.  RESTRICTIVE  MARKINGS 


&*.  NAME  OF  PERFORMING  ORGANIZATION  6b.  C 

( 

McDonnell  Aircraft  Company  I 

6c  ADDRESS  (Gty,  Seat*,  and  ZIP  Cod*) 

McDonnell  Douglas  Corporation 
P.  0.  Box  516,  St.  Louis,  MO  63166 

8a.  NAME  OF  FUNDING /SPONSORING  1 8b.  C 


6b.  OFFICE  SYMBOL 

(If  applicable) 

McAir 


8b.  OFFICE  SYMBOL 
Of  applicable) 


8c  ADDRESS  (City.  Star*,  and  ZIP  Cod*) 

Wright- Patterson  Air  Force  Base,  Ohio 
45433-6533 


3.  DISTRIBUTION /AVAILABILITY  OF  REPORT 

APPROVED  FOR  PUBLIC  RELEASE 
DISTRIBUTION  UNLIMITED 

$  MONITORING  ORGANIZATION  REPORT  NUMBER(S) 

WL-TR-91-8025 

7a.  NAME  OF  MONITORING  ORGANIZATION 

Manufacturing  Technology  Dir.  (WL/MTIB) 
Wright  Laboratory 

7b  ADDRESS  (Gty.  Staff,  and  ZIP  Coda) 

Wright-Patterson  AFB,  OH  45433-6533 

9.  PROCUREMENT  INSTRUMENT  IDENTIFICATION  NUMBER 

F33615-82-C-5036 

10.  SOURCE  OF  FUNDING  NUMBERS 

PROGRAM  |  PROJECT  (TASK  IWORK  UNIT 

ELEMENT  NO  NO.  NO  ACCESSION  NO. 

7801  IF  3095  06  29 


1 1  TITLE  (include  Security  Gasification) 

PRODUCT  DEFINITION  DATA  INTERFACE  (pddi)  ,  Access  Software  User's  Manual 


12  PERSONAL  AUTHOR(S) 

(see  reverse  side) 

13a.  TYPE  OF  REPORT 

Final 

16.  SUPPLEMENTARY  NOTATION 


113b.  TIME  COVERED 
FROM _  TO 


114.  DATE  OF  REPORT  (Year.  Month.  Day)  IlS  PAGE  COUNT 

Tnl  v  1 QQ 1  I  144 


17  COSATI  COOES  18.  SUBJECT  TERMS  (Continue  on  revert*  if  necessary  and  identify  try  block  number) 

field  group  sub-group  Produce  Definition  Data  ICAM  Architecture 

_  Life  Cycle  Document  CAD/ CAM 

Engrg./Mfq.  Interface  (continued  on  back) 

19  ABSTRACT  (Continue  on  reverse  if  necessary  and  identify  by  block  number) 

This  document  is  the  Access  Software  User's  Manual  for  the  Product  Definition  Data  Interface 
(PDDI)  Extensions  contract.  This  document  provides  procedures  for  Application  Programmers 
to  use  the  PDDI  Access  Software.  User's  Manual  UM560130000A  provides  procedures  for  use  of 
the  PDDI  Translator. 


20.  DISTRIBUTION /AVAILABILITY  OF  ABSTRACT  21  ABSTRACT  SECURITY  CLASSIFICATION 

EunciaSSIFied/UNLIMITEO  □  SAME  AS  RPT  Qotic  USERS  Unclassified 
22a.  NAME  OF  RESPONSIBLE  INDIVIDUAL  22b.  TELEPHONE  (Include  Are*  Cod* )  22c  OFFICE  SYMBOL 

Alan  Winn  (513)  255-8787 _  WL/MTIB 

OO  FORM  1473. 84  MAR  83  APR  edition  may  begsed  until  enhausted.  SECURITY  CLASSIFICATION  OF  *his  PAGE 

.  All  othff  editions  art  obsolete.  UNCUSS  I  FI  ED 


DO  FORM  1473. 84  mar 


/ 


UNCLASSIFIED 


12.  Personal  Author(s): 

Chi,  Kelly 
Baldridge,  Gary 
Magnuson,  Charles 
.  Mehl,  Kenneth 
Oakes,  Janet 
Shreve,  Edward 
Ulmer,  Beth 
White,  George 


18.  Subject  Terms: 

Needs  Analysis  Document 
System  Requirement  Document 
State-of-the-Art  Document 
System  Specification  Document 
SS  -  Draft  Standard 
System  Design  Specification 
Product  Specification 
Operators  Manual 
Users  Manual  -  Translator 


UM  560130001 
1  January  1987 


foreword 


This  document  was  produced  under  Air  Force  Contract  F33615-82-C-5036, 
Product  Definition  Data  Interface  (PDDI).  This  contract  is  sponsored  by  the 
Air  Force  Wright  Aeronautical  Laboratories,  Materials  Laboratory,  Air  Force 
Systems  Command,  Wright-Patterson,  Air  Force  Base,  Ohio. 

This  program  is  being  administered  under  the  technical  direction  of  Lt. 
Eric  Gunther,  ICAM  Project  Manager.  The  MCAIR  Program  Manager  is  Mr.  Jerry 
Weiss  and  Mr.  Herb  Ryan  is  the  Deputy  Program  Manager. 

This  document  was  prepared  In  accordance  with  the  ICAM  Configuration 
Management  Life  Cycle  Documentation  requirements  for  the  Configuration  Item. 


UN  560130001 
1  January  1987 


TABLE  OF  CONTENTS 

Paoe 

FOREWORD  .  1 

1.0  SCOPE  1-1 

1.1  IDENTIFICATION .  1-1 

1.2  INTRODUCTION .  1-1 

1.3  OTHER  SYSTEM  MANUALS .  1-1 

1.4  APPROACH .  1-1 

2.0  REFERENCES  2-1 

2.1  APPLICABLE  DOCUMENTS .  2-1 

2.1.1  SPECIFICATION .  2-1 

2.1.2  STANDARDS .  2-1 

2.1.3  OTHER  PUBLICATIONS .  2-1 

2.2  TERMS  AND  ABBREVIATIONS  .  2-3 

3.0  SYSTEM  OVERVIEW  3-1 

3.1  INTRODUCTION .  3-1 

3.2  SYSTEM  INTERFACES  .  3-1 

3.3  SYSTEM  ENVIRONMENT .  3-1 

3.4  PHYSICAL  SCHEMAS .  3-2 

3.5  SOFTWARE  PACKAGES  .  3-2 

3.6  TRANSLATOR . . .  3-5 

3.7  MODEL  ACCESS  SOFTWARE .  .  3-7 

3.8  DATA  ITEMS .  3-8 

3.9  INTERFACE  PARAMETERS .  3-11 

3.10  MEMORY  MANAGER .  3-13 

4.0  INTERFACE  OPERATIONS  4-1 

4.1  INTRODUCTION .  4-3 

4.2  INITIALIZATION/OELETION  OF  THE  ACCESS  SOFTWARE 

ENVIRONMENT .  4-4 

4.3  ENTITY  OPERATIONS  .  4-7 

4.3.1  CREATE  OPERATIONS  .  4-8 

4.3.2  GET  OPERATIONS .  4-16 

4.3.3  UPDATE  OPERATIONS  .  4-19 

4.3.4  OELETE  OPERATIONS  .  4-21 

4.3.5  ACTIVATE  OPERATIONS  .  4-29 

4.3.6  APPLICATION  FUG  OPERATIONS .  4-33 

4.4  LIST  OPERATIONS .  4-42 

4.4.1  BOOLEAN  OPERATIONS .  4-43 

4.4.2  STRUCTURE  OPERATIONS .  4-47 

4.4.3  GENERAL  OPERATIONS .  4-50 

4.4.4  OELETE  OPERATIONS  .  4-57 

4.4.5  EDIT  OPERATIONS .  4-62 

4.4.6  SEQUENTIAL  READ  AND  EXECUTE  OPERATIONS .  4-72 


1  v 


UM  560130001 
1  January  1987 


TABLE  OF  CONTENTS 

Paoe 

5.0  GENERAL  UTILITIES  5-1 

6.0  SAMPLE  PROGRAMS  6-1 

7.0  APPENDICES 

CALLING  PARAMETER  INDEX  .  A-l 

ROUTINE  INDEX  .  B-l 

RETURN  CODE  INOEX .  C-l 

FORTRAN  SCHEMA  DIAGRAM .  D-l 

PASCAL  SCHEMA  DIAGRAM  .  E-l 

GENERAL  TECHNIQUES/GUIDELINES  .  F-l 

RUN-TIME  ENVIRONMENT .  G-l 

MAS  ERROR  AND  WARNING  RETURN  CODE  INDEX  .  H-l 


UM  560130001 
1  January  1987 


USER'S  MANUAL 

SiCTIQN.  1 
SCOPE 


1.1  Identification 

This  User’s  Manual  provides  a  guide  for  the  use  of  ACCESS  Software 
developed  for  the  Product  Definition  Data  Interface  (PDDI)  Project  5601.  This 
project  was  developed  under  Air  Force  Contract  F33516-82-C-5036. 

1.2  Introduction 

Capabilities  documented  In  this  manual  include: 

o  Access  Software  Initialization 
o  Entity  Operations 
o  List  Operations 

This  PDDI  software  operates  on  IBM  43xx,  308xx  or  DEC  VAX  11/780 
computers.  The  environmental  requirements  are  described  in  Section  3. 

The  PDDI  system  documentation  does  not  address  local  (native)  system  or 
computing  environment  documentation. 

This  manual  addresses  IBM  procedures  and  terminology  only. 

1.3  Qthgr  ?y§tgnj  Manuils 

The  associated  Operator’s  Manual  (OM)  describes  the  system  operation  and 
installation  procedures.  It  is  intended  for  use  by  computer  operators  and 
programming  personnel. 

An  associated  User’s  Manual  (UM  560130000)  is  provided  for  users  of  the 
PDDI  Translator. 

The  PDDI  Product  Specification  (PS)  provides  routine  descriptions,  data 
dictionary  listings  and  PDDI  system  messages  for  system  maintenance  purposes. 

1-4  BmJj&h 

This  User’s  Manual  is  divided  Into  six  (6)  main  sections: 
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Section  1  -  Scope  of  this  document. 

Section  2  -  Reference  documentation  applicable  to  PDDI  and  this 
document. 

Section  3  -  The  PDOI  architecture  at  a  high  level  and  Introduction  to 
the  use  of  the  Access  Software. 

Section  4  -  Entity  and  List  Operations  needed  to  access  the  data 
structures  passed  back  to  the  Application  program. 

Section  5  -  Descriptions  of  the  general  utilities  routines  available 
with  the  Access  Software. 

Section  6  -  Sample  programs  using  the  Access  Software  In  Pascal  and 
FORTRAN. 

Appendix  A  -  Access  Software  Calling  Parameter  Index 
Appendix  B  -  Alphabetical  Access  Software  Routine  Index 
Appendix  C  -  Access  Software  Return  Code  Index 
Appendix  0  -  Access  Software  FORTRAN  Schema  Diagram 
Appendix  E  -  Access  Software  Pascal  Schema  Diagram 
Appendix  F  -  General  Techniques/Guidelines 
Appendix  G  -  Run-Time  Environment 
Appendix  H  -  Error  and  Warning  Return  Code  Index 
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SECTION. 2 
REEEBEMCES 


2.1  Applicable  Documents 

2.1.1  Specification: 

D0D-D-1000B 

MIL-D-5840 


2.1.2  Standards: 

ANSI  Y14.5 
ANSI  Y14.26M 


ANSI  B46.1 

ANSI  B92.1 

D0D-STD-100C 

MIL-STD-9 

MIL-STD-12 


I DS 1 50 1 20000C 
IEEE  STD  829 

I SO/TC 1 84/SC4/WG 1 


2.1.3  Other  Publications: 

CLD1 50120000 

FTR110210000U 

FTR110232000U 


Drawings,  Engineering  and  Associated  Lists 
Requirements  for  Data,  Engineering  and  Technical 
Reproduction 


Dimensioning  and  Tolerancing 
Digital  Representation 
Communication  of  Production 
Definition  Data 

Surface  Texture  (Surface  Roughness, 

Waviness  and  Lay) 

Involute  Splines  and  Inspection 
Engineering  Drawing  Practices 
Screw  Thread  Conventions  and  Methods 
of  Specifying 

Abbreviations  for  Use  on  Drawings, 
Specifications,  Standards  and  in 
Technical  Documents 
ICAM  Documentation  Standards 
Standards  for  Software  Test 
Documentation 

4.2:2  The  Step  File  Structure  (Working  Paper 
Version  1.0  28  April  1981 


ICAM  Document  Catalog 
ICAM  Architecture 

ICAM  Architecture  Part  II,  Automated 
IDEFO  Development 


1 
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Product  Definition 
ITR560130001U 

ITR560130002U 

ITR560130003U 

ITR560130004U 

ITR560130005U 

ITR560230006U 

ITR560130007U 

ITR560130008U 

ITR560130009U 

ITR560130010U 

FTR560130001U 

SO  560130001U 
NAD560130000 
SA0560130000 
SR0560130000 


flata. Interface 

First  Interim  Technical  Report 
(Period  1  Oct  82  -  31  Dec  82) 

Second  Interim  Technical  Report 
(Period  1  Jan  83  -  31  Mar  83) 

Third  Interim  Technical  Report 
(Period  1  Apr  83  •  30  June  83) 

Fourth  Interim  Technical  Report 
(Period  1  Jul  83  -  30  Sep  83 

Fifth  Interim  Technical  Report 
(Period  1  Oct  83  -  1  Dec  83) 

Sixth  Interim  Technical  Report 
(Period  1  Jan  84  -  31  Mar  84) 

Seventh  Interim  Technical  Report 
(Period  1  Apr  84  -  30  Jun  84) 

Eighth  Interim  Technical  Report 
(Period  1  Jul  84  -  30  Sep  84) 

Ninth  Interim  Technical  Report 
(Period  1  Oct  84  -  31  Dec  84) 

Tenth  Interim  Technical  Report 
(Period  1  Jan  84  -  31  Mar  85) 

Task  I,  Final  Technical  Report  - 
System  Test  Methodology,  Volume  III 

Technical  Operating  Report  - 
Product  Assurance/Quality 
Assurance  -  15  Oct  85 

Scoping  Document 

Needs  Analysis  Document 

State-of-the-Art  Document 

System  Requirement  Document 
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S0S560130000 

System  Oeslgn  Specification  Document 

SS  560130100 

System  Specification  Document 

SS  560130200 

System  Specification  Document  - 
Draft  Standard 

STP560130000 

System  Test  Plan 

STR560130000 

System  Test  Report 

PS  560130000 

Product  Specification 

OM  560130000 

Operator's  Manual 

UM  560130000 

User's  Manual  (Translator) 

2.2  Terms  and  Abbreviations 

The  following  list  explains  terminology,  acronyms,  and  other  abbreviations 
used  In  this  document. 

ACCESS  SOFTWARE  -  A  set  of  routines  for  creating,  managing  and  querying  an 
incore  Working  Form  model. 

ANSI  -  American  National  Standard  Institute. 

APPLICATION  -  Refers  generlcally  to  any  software  modules  which  are  used  in 
CAD/CAM  functions. 

APPLICATION  REQUEST  -  A  request  Initiated  by  an  application  program,  either 
through  batch  or  Interactive  processing,  which  will  Interrogate  the  model 
through  the  PDDI  Access  Software  to  obtain  or  operate  on  specific  information 
regaru<ng  the  model  and  its  components  or  elements. 

APPLICATION  REQUESTED  DATA  -  The  data  which  fulfills  the  application's  original 
request  and  which  Is  In  the  proper  format  and  readable  by  the  application. 

ASCII  -  American  Standard  Code  for  Information  Interchange. 

ATTRIBUTE  -  An  Item  of  Information  about  an  entity.  A  kgy  attribute  identifies 
the  entity;  a  role  Iterate  gives  a  fact  about  an  entity. 

CAD/CAM  -  Computer  Aided  Design/Computer  Aided  Manufacturing. 

CLASS  -  A  collection  of  entitles  that  are  alike  in  some  manner. 

CLIST  -  IBM  Command  lists. 

CONSTITUENT  -  A  specific  Instance  of  an  entity  that  Is  used  In  the  definition 
of  some  other  entity. 
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CONTEXT-FREE  GRAMMAR  -  The  syntax  of  the  language  gives  a  precise  specification 
of  the  data  without  interpretation  of  it, 

DOMAIN  -  The  set  of  values  permissible  in  a  given  context.  A  natural  domain  is 
the  value  set  native  to  a  given  machine  architecture;  an  imposed  domain  is  a 
specific  subset  of  the  natural  domain. 

DYNAMIC  ALLOCATION  -  The  allocation  (and  deallocation)  of  memory  resources  as 
required  by  the  application.  The  opposite  is  static  allocation  where  a  fixed 
size  segment  of  memory  is  available  to  the  application. 

EBCDIC  -  Extended  Binary  Coded  Decimal  Interchange  Code  (IBM  character  set). 

ENTITY  -  A  collection  of  facts  (attributes)  about  something  of  interest. 

EXTERNAL  REFERENCE  -  A  reference  to  some  quantity  of  data  that  exists  somewhere 
outside  the  scope  of  the  immediate  body  of  Information. 

FUNCTIONALITY  -  (1)  To  show  that  the  configuration  Item  has  fulfilled  the 
specified  requirements.  (2)  The  receiving  and  sending  systems  can  operate  on 
the  entity  in  the  same  manner  with  the  same  results  within  a  pre-defined 
tolerance. 

INCLUDE  FILE  -  Pascal  source  code  from  another  file  or  library  included  on  the 
compilation  of  a  Pascal  source  file. 

INPUT  DATA  -  That  Information  which  the  application  needs  to  supply  In  order  to 
interrogate  or  operate  on  the  model.  This  data  may  assume  only  these  forms 
prescribed  by  the  PDDI  Access  Software  specifications. 

INTERPRETED  REQUEST  -  Input  data  which  has  been  appropriately  modified  to 
conform  to  the  PDDI  Access  Software's  Internal  data  representation  so  that  it 
may  be  further  processed. 

JCL  -  Job  Control  Language  -  IBM  language  used  to  Identify  a  job  and  describe 
its  requirements  to  an  operating  system. 

K£X  *  An  Item  of  data  that  uniquely  identifies  some  specific  Instance  of  an 
entity. 

MA£  -  MCAIR's  acronym  for  the  PDDI  Access  Software  (Model  Access  System). 

METAMODEL  -  A  body  of  data  that  defines  the  characteristics  of  a  data  model  or 
structure. 

MODEL  -  A  collection  of  POD  that  Is  transferable,  dlsplayable,  accessible,  and 
equivalent  to  a  Part.  The  Internal  representation  of  the  application  data,  as 
initiated  and  organized  by  the  user.  The  model  is  also  referred  to  as  the 
Working  Form. 
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MODEL  NETWORK  DEFINITION  -  The  set  of  rules  and  definitions  which  outline  in 
detail  the  data  structure  whereby  higher  order  entitles  may  be  composed  of 
lower  order  entitles,  or  constituents,  and  the  lower  order  entitles  may  be 
constituents  of  one  or  more  higher  order  entities. 

NATIVE  SYSTEM  -  The  PDD  and  applications  In  a  format  that  is  unique  to  the 
database  of  a  CAD  system. 

PARSE  -  The  process  of  analyzing  Input  strings  (records)  to  Identify  fields  and 
to  verify  that  the  data  has  a  valid  format. 

PDD  -  Product  Definition  Data. 

POST- PROCESSOR  -  A  phase  of  the  translator  where  data  Is  received  from  the 
Exchange  Format  and  Is  converted  to  the  Working  Form. 

PRE-PROCESSOR  -  A  phase  of  the  translator  where  data  is  taken  from  the  Working 
Form  and  is  converted  to  the  Exchange  Format. 

QUALITY  -  The  composite  of  all  the  attributes  or  characteristics  including 

performance  of  an  Item  or  product. 

QUALITY  ASSURANCE  -  The  planned  and  systematic  establishment  of  all  actions 

(management/engineering)  necessary  to  provide  adequate  confidence  and 

nonconformance  prevention  provisions  and  reviews  are  established  during  the 
design  phase  and  performed  throughout  the  software  development  and  life  cycle 
phases. 

QUALITY  CONTROL  -  The  planned  and  systematic  application  of  all  actions 

(management/technical)  necessary  to  control  raw  materials  or  products  through 
the  use  of  test,  Inspect,  evaluate,  and  control  of  processes. 

REQUESTED  DATA  -  See  Application  Request  Data. 

RUN  SYSTEM  -  The  Translator  sub-package  which  provides  the  communication 
interface  between  the  user  and  the  pre/post-processors. 

SCHEMA  -  Those  definitions  which  describe  the  content  of  the  data  and  the 
relationship  between  the  various  elements  or  components  of  the  data. 

SOFTWARE  QUALITY  ASSURANCE  fSQAl  -  The  planned  and  systematic  establishment  of 
all  actions  necessary  to  provide  adequate  confidence  that  nonconformance 
prevention  provisions  and  reviews  are  established  during  the  design  pnase  and 
performed  throughout  the  software  development  and  life  cycle  phases. 

SOFTWARE  QUALITY  ASSURANCE  PLAN  (SQAP1  -  An  organized  description  of  the 
methods,  policies,  and  procedures  necessary  to  conduct  software  quality 
assurance  and  control  activities  during  the  design,  development,  delivery,  and 
maintenance  phases. 
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SOFTWARE  quality  CONTROL  -  The  planned  and  systematic  application  of  all 
actions  (management/technical)  necessary  to  ensure  that  the  software  under 
development  or  maintenance  satisfies  the  technical  requirements  through  the  use 
of  tests,  demonstrations,  Inspections,  evaluations,  and  control  of  processes. 

SYSTEM  CONSTRAINTS  -  Those  hardware  and  software  environmental  constraints 
which  will  be  Imposed  upon  the  PDDI  Access  Software  that  will  limit  its 
Implementation  and  application.  An  example  of  such  constraints  might  be  the 
particular  compiler  used  to  compile  the  PODI- Access  Software  package. 

TRANSFER  DATA  -  The  data  required  to  make  an  exchange  of  data  between  systems 
(e.g.,  delimiters,  record  counts,  record  length,  entity  counts,  numeric 
precision) . 

TRANSLATOR  -  A  software  MECHANISM  that  Is  used  for  passing  data  between  the 
Exchange  Format  and  Working  Form  of  the  POD. 

TREE  -  A  collection  of  the  data  that  makes  up  an  Instance  of  an  entity.  The 
Information  is  stored  as  records  In  a  linked  list. 

TREE  STRUCTURE  -  The  arrangement  of  Information  within  a  tree. 

TSO  -  Time  Sharing  Option  -  IBM  function  which  provides  conversational  time 
sharing  from  remote  terminals. 

USER  COMPUTER  SYSTEM  -  The  specific  hardware,  operating  systems,  arr* 
applications  software  systems  that  the  user  will  employ  to  Implement  the  PDD. 
Access  Software. 

WORKING  FORM  -  A  memory  resident  form  of  a  model  that  supports  rapid  access  to 
entities  via  the  Access  Software. 

WORKING  FORMAT  -  The  physical  representation  of  the  Working  Form  within  the 
computer. 
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SECTION  3 
SYSTEM  OVERVIEW 


3.1  Introduction 

The  purpose  of  the  PDDI  Software  System  Is  to  provide  a  prototype  for  the 
communication  of  complete  Production  Definition  Data  (PDD)  between  dissimilar 
CAD/CAM  Systems.  This  system  will  serve  as  the  Information  Interface  between 
Engineering  and  Manufacturing  functions.  It  Is  composed  of  Access  Software, 
Conceptual  Schema,  Exchange  format  and  a  Translator.  (See  Figure  3-1). 

The  Access  Software  Is  a  set  of  callable  utility  programs  that  will  allow 
applications  to  manipulate  and  query  PDD.  The  Conceptual  Schema  contains  the 
human  readable  data  needed  to  define  a  CAD/CAM  model.  The  Exchange  Format  Is  a 
neutral  physical  sequential  format  for  passing  data  between  dissimilar 
systems.  The  PDDI  Translator  Is  the  software  mechanism  for  passing  this  data 
between  the  Exchange  Format  and  the  Working  Form  of  the  PDD. 

3.2  System  Interfaces 

The  PDDI  software  must  Interface  with  the  computer  system  on  which  it  is 
installed,  the  local  (native)  CAD/CAM  database,  the  Exchange  Format,  the 
Working  Form,  and  the  user  ( application ).  It  does  this  via  PDDI  Access 
Software,  the  PDDI  Translator  and  local  (native)  developed  software  packages. 
Note:  Simple  Interim  database  software  Is  Included  In  the  Translator 

software.  This  software  Is  an  Interim  program  to  be  used  until  an  Interface  to 
the  native  database  system  Is  available.  See  Appendix  D  for  an  explanation. 
Figure  3-3  shows  the  environment  In  which  the  PDDI  system  was  developed.  This 
figure  also  shows  the  versatility  of  the  system  and  the  multi -hardware 
environment  In  which  it  may  be  used.  The  left-hand  side  of  Figure  3-3  shows 
the  PDDI  development  environment. 

3.3  System-Environment 

The  PDDI  system  was  developed  In  the  following  computing  environment: 

Comouter/Ooerat 1  no  System 

IBM  43XX/MVS  with  TSO  and  associated  tape  drives,  disk  drives  and 
terminals. 

DEC  VAX  11/780  VMS  with  associated  tape  drives,  disk  drives  and  terminals. 
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Figure  3-1  PDDI  System  Architecture 
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Stnraoa  1 Coral  Raoul rements 

The  mlnlfflun  core  requirements  for  the  PD0I  software  and  database  Is  1.0M 
plus  the  size  of  the  model.  (The  PDDI  Mechlned  Rib  model  required  .57M) 

*  P00I  Machine  Rib 

Compilers 

IBM- PASCAL/VS  Release  2.2 
DEC-PASCAL  V3.3,  FORTRAN  77  V4.4 

Terminals 

E&S  PS300  (or  equivalent  for  graphics  applications) 

IBM  3270  (or  equivalent) 

The  PODI  system  Is  transportable  to  other  computing  systems.  However, 
appropriate  local  (native)  Interfaces  (translator)  must  be  provided.  The 
right-hand  side  of  Figure  3-2  shows  the  PDDI  commercial  demonstration 
architecture  for  UNIGRAPHICS  and  Computervlslon  Systems. 

3.4  Physical  Schemas 

The  Working  Form  physical  schema  Is  determined  through  a  data  dictionary 
or  PASCAL  Include  files.  An  explanation  of  the  form  and  the  use  of  these  files 
can  be  found  In  Appendix  A.  The  Exchange  Format  physical  schema  Is  defined  by 
the  PDOI  conceptual  schema  and  the  specification  for  the  neutral  file  format. 

3.5  Sonware-PicKftflfiS 

The  software  for  the  system  consists  of  two  (2)  packages  -  Access  Software 
and  Translator. 
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Figure  3-2  PDDI  Environment 
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3.6  Translator 

The  PODI  Translator  Is  the  software  package  used  to  format  PDD  for 
transmission  between  systems.  The  Translator  Is  broken  up  Into  three  main 
sub-packages.  These  sub-packages  are:  "Run  System",  "Pre- Processor"  and 

"Post-Processor".  (See  Figure  3-3). 

The  Run  System  Is  the  Interface  between  the  user  and  the  "processors". 
This  package  provides  menus,  queries  and  system  responses  for  the  user. 

Functions  performed  by  this  package  Include:  Perform  system  configuration 
activities,  determine  flies  needed  by  the  processors  and  make  them  available, 
and  provide  messages  to  aid  user  interfaces. 

Access  to  the  native  database  Is  also  provided  by  this  package  via  calls 
to  user-supplied  routines.  Data  from  this  database  is  placed  Into  or  obtained 
from  the  Working  Form  using  calls  to  the  Access  Software.  The  pre-processor  or 
post-processor  is  then  called  to  perform  the  desired  translation. 

The  Pre-Processor  provides  the  Interface  from  the  Working  Form  to  the 
Exchange  Format. 

Working  Form  entitles,  In  the  Working  Form  physical  schema,  are  accessed 
via  the  Access  Software.  Tables,  obtained  from  the  Run  System,  are  then  used 
to  map  the  Working  Form  entitles  to  the  Exchange  Format  physical  schema.  The 
Exchange  Format  entitles  are  then  encoded  and  placed  Into  the  Exchange  Format 
file. 


Transfer  data  Is  collected  during  entity  processing.  This  data  Is  encoded 
and  placed  Into  the  Exchange  Format  file. 

Error  messages  or  condition  codes  are  sent  to  the  "Run  System"  to  Indicate 
the  status  of  the  transfer. 

The  Post-Processor  provides  the  Interface  from  the  Exchange  Format  to  the 
Working  Form. 

A  set  of  tables,  obtained  from  the  Run  System,  Is  used  to  map  the  Exchange 
Format  entitles  to  the  Working  Form  physical  schema.  The  Access  Software  is 
then  used  to  place  these  entitles  Into  the  Working  Form. 
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3.7  Model  Access  Software 

The  PDDI  Access  Software  Is  a  set  of  Pascal  procedures  that  maintains  the 
physical  structure  of  related  user  data  in  computer  memory.  This  user  data  Is 
referred  to  as  the  working  form  model.  The  package  provides  an  Interface  to 
the  working  form  model  for  application  programs  to  create,  relate,  and  access 
elements  of  user  data. 

The  application  programs  are  Independent  of  the  physical  structure  of  the 
stored  data  elements.  This  Independence  ensures  that  as  different  structure 
techniques  are  Implemented,  the  application  programs  need  not  change. 

This  package  manages  two  types  of  data:  entitles  and  lists.  An  entity  is  an 
element  of  data  supplied  by  the  application  to  be  stored  In  the  working  form. 
A  list  Is  a  collection  of  entity  keys.  The  package  manages  lists  created  by 
the  application  In  the  working  form. 

The  Access  Software  allows  the  structuring  of  the  user  data.  The  entities  can 
be  related  In  user/constituent  order.  An  entity  may  be  related  to  multiple 
user  entitles,  creating  a  network  structure  in  the  working  form.  An  entity  may 
also  contain  multiple  constituent  entitles. 
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3.8  DATA  ITEMS 

The  Access  Software  manages  two  types  of  data  Items  within  the  working  form  - 
Entitles  and  Lists. 


ENTITY 


An  entity  Is  the  principle  data  Item  managed  by  the  Access  Software,  and  Is: 

o  Defined  by  the  conceptual  schema  In  the  application  creating  the 
entity. 

o  Accessed  by  a  unique  key  return  from  the  create  entity  function 

o  A  node  in  the  working  form  structure  containing  an  Attribute  Data 

Block(ADB),  and  references  to  other  entities  in  Constituent 
Relationships  and/or  User  Relationships 


ATTRIBUTE  DATA  BLOCK 


An  Attribute  Data  Block(AOB)  Is  a  collection  of  data  embedded  in  a  single 
contiguous  block  of  memory.  Individual  pieces  of  data  within  an  ADB  are  call 
attributes.  MAS  manages  only  the  first  three  Items  in  the  structure  of  an 
ADB.  These  three  attributes,  KIND,  LENGTH,  and  SYSUSE,  are  required  in  every 
entity.  A  short  description  of  each  attribute  follows: 

KIND  -  Must  be  the  first  Item  defined  in  the  ADB.  The  KIND  defines  the  entity 
type  code.  This  code  cannot  be  changed. 

LENGTH  -  Must  be  the  second  Item  defined  in  the  ADB.  The  LENGTH  defines  the 
number  of  bytes  In  the  ADB  Including  KIND,  LENGTH,  and  SYSUSE. 

SYSUSE  -  One  full  word  of  system  use  data  reserved  for  Internal  purposes.  This 
data  Is  never  used  by  the  application,  and  should  never  be  inspected  or 
modified. 

NOTE:  All  other  attribute  data  In  the  ADB  is  managed  by  the  application 

program. 
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CONSTITUENT  RELATIONSHIP 

A  constituent  entity  Is  used  In  the  definition  of  the  user  entity.  Inclusive 
constituents  of  an  entity  encompass  all  descendents,  their  descendents,  and  so 
forth  until  there  are  no  more  descendents.  For  example  In  Figure  3-4,  Point  0 
(P0)  and  Point  1  (PI)  are  constituents  of  Line  1. 

LINE  -  ENTITY(5008); 


E.laure  3-4  _LINE:_  An  Entity  With  Constituents 
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USER  RELATIONSHIPS 

A  user  entity  uses  constituent  entitles  In  Its  definition.  Inclusive  users  of 
an  entity  include  all  ancestors,  their  ancestors,  and  so  forth  until  there  are 
no  more  ancestors.  For  example  In  Figure  1-1,  Line  1  Is  a  user  of  Point  0  (P0) 
and  Point  1  (PI). 


LIST 

A  list  is  a  collection  of  entity  keys  which  is: 
o  Created  by  the  Application  program. 

o  Accessed  by  a  unique  list  key  returned  from  the  Create  List  Functions. 

o  Used  by  the  Application  to  store  selected  entity  keys  for  subsequent 

processing. 
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3.9  INTERFACE  PARAMETERS 

Each  interface  parameter  has  a  name  and  a  type.  This  information  is  shown  as 
follows: 

DATA-NAME : DATA-TYPE . 


DATA-NAME  PARAMETERS 

The  following  conventions  are  used  to  name  parameters: 

-  Keys  are  named  KEY1,  KEY2, . . .KEYN. 

-  The  ADB  Is  named  ENTDEF. 

-  Text  parameters  are  named  according  to  thei-  purpose. 

-  Integer  parameters  are  named  according  to  their  purpose. 

-  A  return  code  Is  produced  by  every  in" erf ace  routine/operation.  This 
parameter  is  a  full  word  Integer  and  is  always  named  IRC.  (See  Appendix  for 
a  return  code  list.) 

DATA-TYPE  PARAMETERS 

Data-Type  parameters  may  be  one  of  the  following: 

ANYKEY  -  Access  key  of  an  entity  or  list. 

ENTBLOCK  -  Entity  data  block  definition. 

-  In  Pascal,  probably  declared  as  a  record. 

-  In  Fortran,  declared  as  a  common  or  dimension  array. 

CHARACTER  -  A  single  character  as  defined  by  the  system. 

INTEGER  -  A  full  word  Integer. 
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FORMAL  DATA  TYPES 


The  following  Is  a  reference  list  of  data-types  for  Interface  calls  In  this  MAS 
document. 


ANYKEY 

LISTKEY 

ENTKEY 

ORD  KINO 

EXT~RET  COOE 

LISTPSTN 

LISTINOX 

LISTSIZE 

ROUTINE 

NAMTYP 


INTEGER 

ANYKEY 

ANYKEY 

INTEGER 

INTEGER 

INTEGER 

INTEGER 

INTEGER 

ARRAY (1... 8)  OF  CHARACTER 
ARRAY (1... 6)  OF  CHARACTER 


(ADB)  ENTBLOCK 
KIND 
SIZE 
SYSUSE 
DATA 


-  RECORD  OF 

-  ORD  KIND 

-  INTEGER 

-  INTEGER 

-  (USER  DEFINED) 


PASCAL  APELICAUQNS 

The  formal  declarations  for  the  Access  Software  interface  routines  are 
maintained  In  the  member  API  TYP  of  the  library  "CAD5.FRMI .MASymmdd. INCLD" 

Where: 

y  -  year 
mm  -  month 
dd  -  day 

of  the  latest  Access  Software  release. 
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3.10  msmM 


A  Model  Access  Memory  Manager  was  developed  to  replace  the  PASCAL  run-time 
memory  manager.  It  reduces  the  number  of  bytes  of  overhead  required  for 
free-space  collection,  and  Isolates  the  working  form  model  from  all  other 
PASCAL  dynamic  allocations. 

This  memory  manager  Is  currently  In  the  MAS  package  and  requires  no  user 
intervention  for  utilization. 
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4.1  introduction 


The  Entity  Operations  and  List  Operations  sections  provide  the  applications 
programmer  with  the  Interface  operations  needed  to  access  the  data  structures 
passed  back  to  the  application  program.  (See  appendix  for  Pascal  and  FORTRAN 
Schema  Diagrams.) 

Figure  4-1  Illustrates  the  Interrelationships  of  the  Access  Software  Interface 
operations  shown  In  these  sections. 


Figure  4-1 _ Interface  Operations 
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4.2  INITIALIZATION /OH  FT I ON  OF  THE  MAS  ENVIRONMENT 


Two  routines  provide  the  Interface  used  to  Initialize  the  Access  Software. 

The  basic  Initialization  operation  (MAINIT)  creates  a  working  model  and  enables 
the  Access  Software. 

The  MAKILL  function  Is  used  to  destroy  the  working  model  and  disable  the  Access 
Software. 

An  application  does  not  have  to  Install  a  data  dictionary.  It  can  create  and 
use  entitles  on  an  ad  basis.  If  a  data  dictionary  is  not  Installed,  the 
following  limitations  are  Imposed: 

1.  Any  entity  type  will  be  permitted. 

2.  The  interface  routines  will  not  validate  any  operation  other  than 
outright  errors;  e.g.,  defining  an  ADB  with  a  negative  length.  The 
application  is  -  "on  Its  own". 

3.  There  will  be  no  provision  for  organization  of  entities  by  class. 

Included  with  the  Initialization  and  deletion  operations  descriptions  that 
follow  are  the  error  and  warning  messages  that  may  be  returned.  Appendix  A 
contains  a  complete  list  of  these  messages  along  with  their  numeric  codes. 
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MINI! 


FUNCTION:  Initialize  the  working  model. 

FORMAT:  MAINIT  (IRC) 

INPUT: 

None 


OUTPUT: 

IRC:  INTEGER 

The  procedure  return  code. 
DESCRIPTION:  The  working  model  will  be  Initialized. 


The  Access  Software  Is  enabled. 


ERRORS:  Message 

MAS_INIT_FAILED 

MAINIT_ALREADY_DONE 

NOT_ENOUGH_ROOM 


Explanation 

Could  not  create  schema  and  it. 
root. 

Root  already  created. 

No  more  core  memory. 


NOTE:  Do  not  call  MAINIT  twice  In  succession.  This  will  result  In  2  Access 

Software  environments.  Use  a  MAKILL  to  delete  the  current  environment 
before  Initializing  another. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 
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mm 


Delete  the  current  working  model. 

MAKILL  (IRC) 

INPUT: 

None 

OUTPUT: 

IRC:  INTEGER 

The  procedure  return  code. 
The  entire  working  model  Is  destroyed. 
The  Access  Software  Is  disabled. 

None. 
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4.3  ENTITY  OPERATIONS 


The  basic  entity  operations  can  be  categorized  by  the  following  functions: 

Activate 

Create 

Get 

Delete 

Update 

Process  Flags 
Application  Flags 


All  operations  performed  on  entity  constituent  lists  are  done  by  list 
operations,  with  the  exception  of  creating  an  entity  with  constituents. 

Included  with  the  entity  operations  descriptions  presented  on  the  pages  that 
follow  are  the  error  and  warning  messages  that  may  be  returned.  Appendix  A 
contains  a  complete  list  of  these  messages  along  with  their  numeric  codes. 
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4.3.1  CREATE  OPERATIONS 


These  operations  allow  the  creation  of  entitles  In  the  working  model.  The 
application  creates  the  entity  In  Its  local  memory  space.  This  includes  the 
specification  of  KIND,  LENGTH,  and  any  other  attribute  data  as  needed.  The 
KIND  value  cannot  change.  The  LENGTH  value  can  be  changed  by  the  MAEUD 
function. 

The  create  routines  are  shown  In  the  following  table. 


DESCRIPTION 

ROUTINE 

Create  an  entity. 

MAECR 

Create  an  appl4.?Mon  list  of  constituent  entity  references. 

MAEC 

Create  ar  application  list  of  inclusive  constituent  entities. 

MAECI 

Create  an  application  list  of  inclusive  constituents  by  KIND. 

MAECIK 

Create  an  application  list  of  user  entity  references. 

MAEU 

Create  an  application  list  of  Inclusive  user  entitles. 

MAEUI 

Create  an  application  list  of  inclusive  users  by  KIND. 

MAEU IK 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


EXAMPLE: 

ERRORS: 


Create  an  entity. 
MAECR(ENTDEF,KEY1,KEY2,IRC) 


INPUT: 

ENTDEF  : 

ENTBLOCK 

The  application  data  structure  which  contains 
the  entity  definition. 

KEY1  : 

ANYKEY 

The  entity  or  list  of  entitles  to  be  made 
constituents  of  the  entity  being  created. 

OUTPUT: 

KEY  2  : 

ENTKEY 

The  key  of  the  newly  created  entity. 

IRC  : 

INTEGER 

The  return  code. 

The  entity  Is  added  to  the  model.  Constituent  entitles  are 
connected  to  the  entity.  If  KEY1  Is  an  entity  key  then  only  that 
entity  will  become  a  constituent.  If  KEY1  Is  a  list  key  then  all 
entitles  In  the  list  will  become  constituents. 

A  nil  key  may  be  used  If  the  entity  being  created  is  to  have  no 
constituents^  full  word  Integer  zero  can  be  used  as  a  nil  key). 

NOTE:  The  application  Is  responsible  for  the  format  of  the  ADT 
data  after  the  first  three  Items  (KIND,  SIZE,  SYSUSE). 

See  Sample  Programs  Section. 


Message 


Description 


BAD_L I ST_POS IT ION 
BAD  ENT  KINO 
N0T_EN0UGH  ROOM 


Incorrectly  built  model. 

Kind  of  given  key  undefined. 
No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


Create  an  application  list  of  constituent  entities. 


MAEC ( KEY 1 , KE Y2 , I RC ) 

INPUT: 

KEY1 

:  ANYKEY 

The  entity  or  list  of 
of  direct  constituents 

entities  for  which  a  list 
is  wanted. 

OUTPUT: 

KEY2 

:  LISTKEY 

The  returned  key  of 
direct  constituents. 

the  application  list  of 

IRC 

:  INTEGER 

The  return  code. 

KEY2  is  created.  If  KEY1  Is  an  entity  key  then  the  constituent 
list  of  KEY1  will  be  copied  Into  KEY2.  If  KEY1  is  a  list  key 
then  the  constituent  lists  of  each  entity  will  be  copied  into 
KEY2. 


Dgsg^lpt jgn 


BAD  LIST  REFERENCE 
BAD_ENT_KEY 
NOT  ENOUGH  ROOM 


Given  key  not  an  entity  or  a  list. 
Nil  key. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

NOTE: 

ERRORS: 


Create  an  application  list  of  Inclusive  constituent  entitles. 
MAECI(KEY1,KEY2,IRC) 


INPUT: 

KEY1 

:  ANYKEY 

The  entity  or  list  of  entitles  whose  inclusive 
constituents  are  wanted. 

OUTPUT: 

KEY2 

:  LISTKEY 

The  returned  key  of  the  inclusive  application 
list  of  constituents. 

IRC 

:  INTEGER 

The  return  code. 

KEY2  Is  created.  If  KEY1  Is  an  entity  key,  then  the  inclusive 
constituent  list  of  KEY1  will  be  copied  into  KEY2.  If  KEY1  is  a 
list  key,  then  the  inclusive  constituent  lists  of  each  entity 
will  be  copied  Into  KEY2.  KEY1  is  not  included  in  KEY2. 

No  duplicate  keys  will  exist.  Entitles  are  marked  as  "processed" 
when  placed  In  the  output  list.  If  a  processed  entity  is 
encountered  again  on  another  constituent  list,  it  will  not  be 
repeated  on  the  output  list. 

See  Sample  Programs  Section. 

See  the  System  Overview  Section  for  further  explanation  of 
inclusive  constituents. 


Message 


Rescript Iqn 


BAD  LIST  REFERENCE 
BAD_ENT  KEY 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Nil  key. 

No  more  core  memory. 


NO_LIST_CREATED 


WARNING: 


UM  560130001 
1  January  1987 


FUNCTION: 

FORMAT: 


DESCRIPTION: 

NOTE: 

ERRORS: 

WARNING: 


HAKIK 


Create  an  application  list  of  inclusive  constituents  of  a 
specified  KIND. 


MAECIK(KEY1,KIND 

,  KEY2 , IRC) 

INPUT: 

KEY1  : 

ANYKEY 

The  entity  or  list  of  entities  whose  inclusive 
constituents  are  to  be  searched  for  by  specified 
KINO. 

KINO  : 

INTEGER 

The  KIND  code  of  an  entity  or  an  entity  class. 

OUTPUT: 

KEY2  : 

LISTKEY 

The  key  of  a  list  which  will  contain  all 
entitles  of  the  specified  KIND  found  within  the 
inclusive  constituents  of  KEY1 . 

IRC 

INTEGER 

The  return  code. 

KEY2  Is  created.  If  KEY1  Is  an  entity  key  then  the  Inclusive 
constituents  of  the  specified  KIND  will  be  copied  into  KEY2.  If 
KEY1  is  a  list  key  then  the  Inclusive  constituents  of  all 
entitles  on  the  list  of  the  specified  KIND  will  be  copied  into 
KEY2. 

No  duplicate  keys  will  exist. 

See  Entity  In  the  System  Overview  for  further  explanation  of 
inclusive  constituents. 


Message 


Description 


BAD  LIST  REFERENCE 
BAD.ENT.KEY 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Nil  key. 

No  more  core  memory. 


NO_LIST_CREATED 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

ERRORS: 

WARNING: 


Create  an  application  list  of  user  entity  references. 
MAEU (KEY 1 , KE Y2 , I RC ) 


INPUT: 

KEY1 

:  ANYKEY 

The  entity  or  list  of  entitles  for  which 
of  direct  users  Is  wanted. 

a  1  ist 

OUTPUT: 

KEY2 

:  LISTKEY 

Returned  key  of  the  application  list  of 
users. 

direct 

IRC 

:  INTEGER 

The  return  code. 

KEY2  Is  created.  If  KEY1  Is  an  entity  key  then  the  user  list  of 
KEY1  will  be  copied  Into  KEY 2.  If  KEY1  Is  a  list  key  then  the 
user  lists  of  each  entity  will  be  copied  Into  KEY2. 


See  Sample  Program  Section. 


Message 

BAD  ENT  KEY 
NO_MORE_ROOM 

NO_LIST_CREATED 


Description 

Nil  key. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

NOTE: 

ERRORS: 

WARNING: 
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HA£Ui 


Create  an  application  list  of  inclusive  user  entities. 
MAEUI(KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entities  whose  inclusive 
users  are  wanted. 

OUTPUT: 

KEY2  :  LISTKEY 

The  returned  key  of  the  inclusive  application 
list  of  users. 

IRC  :  INTEGER 

The  return  code. 

KEY2  is  created.  If  KEY1  is  an  entity  key,  then  the  inclusive 
user  list  of  KEY1  will  be  copied  into  KEY2.  If  KEY1  is  a  list 
key,  then  the  Inclusive  user  lists  of  each  entity  will  be  copied 
into  KEY2.  KEY1  is  not  Included  in  KEY2. 

No  duplicate  keys  will  exist. 

See  the  System  Overview  Section  for  further  explanation  of 
inclusive  users. 


Message 


Description 


BAD  LIST.REFERENCE 
BAD  ENT  KEY 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Nil  key. 

No  more  core  memory. 


NO_LIST_CREATED 
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MAEUIK 


FUNCTION:  Create  an  application  list  of  Inclusive  users  by  KIND. 

FORMAT:  MAEUIK(KEY1, KIND, KEY2, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  whose  inclusive 
users  are  to  be  searched  for  by  specified  KIND. 

KIND  :  INTEGER 

The  KIND  code  of  an  entity  or  an  entity  class. 

OUTPUT: 

KEY2  :  LISTKEY 

The  key  of  a  list  which  will  contain  all 
entitles  of  the  given  KIND  found  within  the 
Inclusive  users  of  KEY1. 

IRC  :  INTEGER 

The  return  code. 

DESCRIPTION:  KEY2  Is  created.  If  KEY1  Is  an  entity  key,  then  the  inclusive 
users  of  the  specified  KIND  will  be  copied  into  KEY2.  If  KEY1  is 
a  list  key,  then  the  Inclusive  users  of  all  entitles  on  the  list 
of  the  specified  KIND  will  be  copied  Into  KEY2. 

NOTE:  See  the  System  Overview  Section  for  further  explanation  of 

inclusive  users. 


ERRORS:  Message  Description 

BAD_LIST_REFERENCE  Given  key  not  an  entity  or  a  list. 

BAD_ENT_KEY  Nil  key. 

NO_MORE_ROOM  No  more  core  memory. 

WARNING:  NO_lI$T_CREATED 
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4.3.2  GET  OPERATIONS 


These  operations  are  used  to  get  the  MAS  copy  of  a  specified  entity  attribute 
block  and  load  It  Into  the  application  memory  area.  Get  operations  are  also 
used  to  get  a  specified  attribute  In  the  entity  AOB. 

The  get  routines  are  shown  In  the  table  below. 


DESCRIPTION 

ROUTINE 

Get  the  KIND  value  of  a  specific  entity. 

MAEGKN 

Get  the  ADB  of  a  specific  entity. 

MAEGTK 

> 


FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 
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MAEGKN 

Get  the  KINO  value  of  a  specific  entity. 
MAEGKN (KEY 1 , KIND , I RC ) 


INPUT: 

KEY1 

:  ENTKEY 

The  entity  whose  kind  Is  to  be  gotten. 

OUTPUT: 

KIND 

:  INTEGER 

The  KIND  value  of  the  specified  entity. 

IRC 

:  INTEGER 

The  return  code. 

The  stored  ADB  Is  located.  The  KIND  value  In  the  ADB  is  moved  tc 
the  application  ADB. 


Message  Description 

BAD_ENT_KEY  Nil  key  or  not  an  entity. 

NO_MORE_ROOM  No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

ERRORS 


HAEfiTK 


Get  the  ADB  of  a  specific  entity. 
MAEGTK ( KEY 1 , ENTDEF , I RC ) 

INPUT: 


KEY1  : 

ENTKEY 

The  key  of  the  entity  to  be  gotten. 

OUTPUT: 

ENTDEF  : 

ENTBLOCK 

The  ADB  to  receive  the  stored  entity. 

IRC  : 

INTEGER 

The  return  code. 

The  stored  ADB 

is  located  and  moved  to  the  application  ADB. 

KEY1  Is  a  nil  key,  then  a  nil  KIND  and  a  zero  LENGTH  is  returned. 
See  Sample  Program  Section. 


Message 


Pescr.lBtlen 


BAD_ENT_KEY 

NO_MORE_ROOM 


Nil  key  or  not  an  entity. 
No  more  core  memory. 
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4.3.3  UPDATE  OPERATIONS 


These  operations  are  used  to  update  the  ADB  for  specified  entitles.  In 
general,  the  application  should  use  the  MAEGTK  function  to  get  the  ADB  before 
the  update  function  Is  used. 


The  update  routine  Is  shown  In  the  following  table. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


MM 


Update  the  attribute  data  block  of  an  entity. 
MAEUD ( KEY 1 , ENTDEF ,  I RC ) 


INPUT: 

KEY1  :  ENTKEY 

The  entity  to  be  updated.  This  must  be  an 
entity  key. 

ENTDEF  :  ADB 

The  ADB  supplying  the  update  values. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

The  ADB  of  KEY1  will  be  updated.  The  value  of  KIND  must  agree 
with  the  Model  Access  Software  copy  of  this  entity.  Otherwise, 
an  error  will  result.  If  the  LENGTH  is  greater  than  the  current 
LENGTH,  then  a  new  AOB  will  be  created  with  more  space. 


Mfiiaae 


Description 


BAD  ENTJCIND 
BAD_ENT_KEY 
CANTJJPDATE  ENTITY 
NO  MORE  ROOM 


Kind  or  given  key  is  undefined. 
Given  key  is  nil. 

No  more  core  memory. 
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4.3.4  DELETE  OPERATIONS 


These  operations  address  how  you  delete  entitles  from  the  HAS  working  form 
model.  The  entitles  In  the  working  model  currently  are  grouped  Into  the 
following  classifications: 

o  Dependent 
o  Support 
o  Primary 
o  Secondary 

Delete  rules  have  been  established  for  the  entitles  In  these  classifications. 
For  a  new  entity  kind,  the  default  classification  Is  "Dependent"  unless  it  is 
otherwise  defined. 

DELETE  RULES 

The  delete  rules  apply  to  the  constituent  relationships  with  which  entities  are 
defined.  They  determine  whether  a  constituent  entity  can  be  deleted  by 
checking  each  of  Its  user  entitles.  For  example,  the  delete  rules  applied  to 
entity  (A)  In  relation  to  a  specific  user  entity  (B)  may  be  different  than  the 
delete  rules  for  that  same  entity  (A)  In  relation  to  another  specific  user 
entity  (C). 

The  action  taken  for  the  IDB/MAS  delete  classifications  are  determined  by  the 
combinations  of  yes/no  (Y/N)  answers  to  the  following  conditions,  posed  as 
questions: 

(1)  Can  this  constituent  entity  be  deleted  from  a  specific  user  entity? 

(2)  Does  the  deletion  of  this  (constituent)  entity  cause  deletion  of  a 
specific  user? 

(3)  Does  deletion  of  a  specific  user  cause  deletion  of  this  entity 
(constituent)? 


CONDITION 

DELETE  CLASSIFICATION 

(1) 

(2) 

(3) 

N 

N 

N 

Dependent 

N 

N 

Y 

Support 

N 

Y 

N 

Primary 

Y 

N 

N 

Secondary 
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The  delete  classifications  are  defined  as  follows: 

Dependent  -  Constituent  entity  cannot  be  deleted  because  the  user  entity 
Is  dependent  on  Its  existence.  The  user  entity  may  be  deleted 
without  deleting  the  constituent  entity. 

Support  •  Constituent  entity  cannot  be  deleted  because  the  user  entity 
Is  dependent  on  Its  existence.  The  user  entity  may  be 

deleted;  however,  the  constituent  entity  will  also  be  deleted 
unless  another  user  entity  does  not  permit  the  deletion  of  the 
constituent  entity. 

Primary  -  Constituent  entity  can  be  deleted,  but  only  if  the  user 
entity  can,  and  will,  also  be  deleted.  The  user  entity  may  be 
deleted  without  the  constituent  entity  being  deleted. 

Secondary  -  If  the  number  of  constituents  falls  below  an  established 
minimum,  the  constituent  entity  can  be  deleted  and,  if 
possible,  the  user  entity  will  also  be  deleted.  If  the  user 
entity  cannot  be  deleted,  none  of  the  minimum  constituents  can 
be  deleted.  If  the  number  of  constituents  Is  greater  than  or 
equal  to  the  minimum,  the  constituent  entity  can  be  deleted. 

Test  routines  are  provided  to  return  the  entitles  or  lists  that  would  be 
deleted  If  actual  delete  routines  were  used. 
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OELETE  ROUTINES 

The  IDB/MAS  delete  routines  are  presented  In  the  following  table.  The  first 
two  routines  actually  delete  entitles  (MAED,  MAEDI).  The  third  and  fourth 
routines  test  the  delete  function,  allowing  the  programmer  to  see  the  results 
of  a  potential  delete  without  modifying  the  stored  data  (MAEDT,  MAEDTI). 

When  deleting  a  list  of  entitles  that  Includes  users  and  constituents,  the  list 
should  be  ordered  so  that  the  users  are  processed  before  the  constituents.  The 
routines  MALROR  and  MALRORI  perform  this  function  on  an  application  list.  (An 
entity  constituent  list  should  never  be  reordered.) 


DESCRIPTION 

ROUTINE 

Delete  an  entity  or  list  of  entitles. 

MAED 

Delete  an  entity  or  list  of  entitles  and  the  inclusive 
constituents. 

MAEDI 

Delete  test  an  entity  or  list  of  entitles. 

MAEDT 

Delete  test  an  entity  or  list  of  entitles  and  the  inclusive 
constituents. 

MAEDTI 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


WARNINGS: 


M£I2 


Delete  an  entity  or  list  of  entities. 

MAED(KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entities  to  be  deleted. 

OUTPUT: 

KEY2  :  LISTKEY 

The  list  of  entitles  marked  for  deletion. 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key,  and  the  order  of 
the  entities  In  the  list  may  be  Important.  KEY2  will  list  any 
entitles  from  the  KEY1  list  that  were  not  deleted.  If  all 

entities  are  deleted,  the  mark  list  will  be  empty. 


liSIMS 


P.eicr.,tglt.gj3 


BAD  LIST  REFERENCE 
RULE_DOES_NOT_MATCH 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Rules  defined  Incorrectly. 

No  more  core  memory. 


EMPTY_MARK_IIST  No  entities  marked  for  delete. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


mu 


Delete  an  entity  or  list  of  entitles  and  their  inclusive 
constituents. 

MAEDI (KEY1 ,KEY2, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  deleted. 

OUTPUT: 

KEY 2  :  LISTKEY 

The  list  of  entities  marked  for  delete. 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key,  and  the  order  of 
the  entitles  In  the  list  may  be  important.  KEY2  will  list  any 
entitles  from  the  KEY1  list  that  were  not  deleted.  If  all 

entitles  are  deleted,  the  mark  list  will  be  empty. 


Message 


Pescrlptlaa 


BADJ.IST  REFERENCE 
RULE.DOES  NOT  MATCH 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Rules  defined  incorrectly. 

No  more  core  memory. 


WARNINGS: 


EMPTY_MARK_LIST 


No  entitles  marked  for  delete. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 

WARNINGS: 


MAEDT 

Delete  test  an  entity  or  list  of  entitles. 
MAEDT { KEY 1 , KEY 2 , KEY3 , I RC ) 

INPUT: 


KEY1 

:  ANYKEY 

The  entity  or  list  of  entities  to 

be  tested. 

OUTPUT: 

KEY2 

:  LISTKEY 

The  list  containing 
deleted  by  MAED. 

entities 

that 

would 

KEY3 

:  LISTKEY 

The  list  containing 
marked  by  MAED. 

entitles 

that 

would 

IRC 

:  INTEGER 

The  return  code. 

The  MAEDT  delete  routine  simulates  the  output  of  the  MAED  routine 
without  actually  deleting  the  entitles  or  marking  them  inactive. 


ttes&age 

BADJJELETE.KEY 
RULE  DOES.NOT  MATCH 
NO_MORE_ROOM 

EMPTY  DELETE  LIST 
EMPTY_MARK_LIST 


Passrlptlpn 

Given  key  not  an  entity  or  a  list. 
Rules  defined  Incorrectly. 

No  more  core  memory. 

Given  delete  list  was  empty. 

No  entities  marked  for  delete. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 

WARNINGS: 
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MAEDTI 


Delete  test  an  entity  or  list  of  entitles  and  their  Inclusive 
constituents. 

MAEDT I (KEY 1 , KEY2 , KEY3 , I RC ) 

INPUT: 


KEY1 

:  ANYKEY 

The  entity  or  list  of  entities  to 

be  tested. 

OUTPUT: 

KEY2 

:  LISTKEY 

The  list  containing 
deleted  by  MAEDI. 

entitles 

that 

would 

KEY3 

:  LISTKEY 

The  list  containing 
marked  by  MAEDI. 

entities 

that 

would 

IRC 

INTEGER 

The  return  code. 

The  MAEDTI  delete  routine  simulates  the  output  of  the  MAEDI 
routine  without  actually  deleting  the  entities  or  rendering  them 
inactive. 


Mfi&saqg 


D«crlptlap 


BAD  LIST_REFERENCE 
BAD_DELETE_KEY 
RULE_D0ES_N0T  MATCH 
NO  MORE  ROOM 


Given  key  not  an  entity  or  a  list. 
Given  key  Is  nil . 

Rules  defined  Incorrectly. 

No  more  core  memory. 


EMPTY_DELETEJ.IST  Given’  delete  list  was  empty. 

EMPTY.MARKjJST  No  entities  marked  for  delete. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


WARNINGS: 


MAEPTS 


Delete  test  an  entity  or  list  of  entitles  and  return  three  lists. 
MAEDTS ( KE Y 1 , KEY2 , KEY3 , KE Y4 , I RC ) 

INPUT: 


KEY1 

:  ANYKEY 

The  entity  or  list  of  entitles  to  be  tested. 

OUTPUT: 

KEY2 

:  LISTKEY 

The  list  of  entities  that  would  be  deleted  by 
MAED. 

KEY3 

:  LISTKEY 

The  list  of  entitles  that  would  not  be 
deleted  by  MAED. 

KEY4 

LISTKEY 

The  list  of  entitles  that  would  be  marked  for 
delete  by  MAED. 

IRC 

INTEGER 

The  return  code. 

The  MAEOTS  routine  Is  similar  to  MAEDT  except  that  three  lists 
are  returned.  KEY2  and  KEY4  can  be  submitted  to  directly  delete 
and  mark  entitles  without  checking  the  delete  rules. 


Massage 


Description 


BAO  LIST.REFERENCE 
BAD  OELETEJCEY 
RULE  DOES  NOT  MATCH 
NO_MORE_ROOM 


Given  key  not  an  entity  or  a  list. 
Given  key  is  nil . 

Rules  defined  incorrectly. 

No  more  core  memory. 


EMPTY_OELETE_LIST  Given  delete  list  was  empty. 

EMPTY_MARKJ.IST  No  entitles  marked  for  delete. 
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4.3.5  ACTIVATE  OPERATIONS 


These  operations  are  used  to  activate  an  entity.  An  entity  Is  deactivated  when 
a  delete  was  attempted,  but  was  not  completed  because  of  the  user's  dependency 
condition  on  the  entity.  (See  Oelete  Operations  Section) 

The  activate  routines  are  shown  In  the  table  below. 


DESCRIPTION 

ROUTINE 

Activate  an  entity  or  list  of  entities. 

MAEA 

Activate  an  entity  or  list  of  entitles  and  their  Inclusive 
constituents. 

MAEAI 

Find  the  present  value  of  the  activation  setting  for  an  entity. 

MAEAV 

NOTE: 

o  Activation  is  not  the  same  as  rejection  after  a  delete.  If  an  entity 
was  deleted,  then  It  cannot  be  recovered  with  these  functions. 

o  Activation  functions  will  activate  any  entity  regardless  of  when  or 
how  It  was  made  Inactive. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 


Activate  an  entity  or  list  of  entitles. 

MAEA  (KEY1, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  activated. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  Is  an 
entity  key  then  only  that  entity  will  be  activated.  If  KEY1  Is  a 
list  key  then  all  entitles  In  the  list  will  be  activated. 


ties  sags 


Explanation 


BAD_LIST_REFERENCE 
BAD  ENT  KEY 
NOT  ENOUGH  ROOM 


Given  key  not  an  entity  or  a  list. 
Nil  key. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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Activate  an  entity  or  list  of  entitles  and  their  Inclusive 
constituents. 

MAEAI (KEY1 , IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  activated. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  an 
entity  key  then  only  that  entity  and  Its  Inclusive  constituents 
will  be  activated.  If  KEY1  is  a  list  key  then  all  entitles  in 
the  list  and  their  inclusive  constituents  will  be  activated. 

See  the  System  Overview  Section  for  further  explanation  of 
Inclusive  constituents.  ' 

Message 

BAD_LIST_REFERENCE 
NOT_ENOUGH_ROOM 


Deserts.!  Ion 

Given  key  not  an  entity  or  a  list. 
No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


MEM 


Find  the  present  value  of  the  activation  setting  for  an  entity. 
MAEAV ( KEY 1 , I AVAL • IRC) 

INPUT: 

KEY1  :  ENTKEY 

The  entity  to  be  examined. 

OUTPUT: 

IAVAL  :  INTEGER 

The  activation  code. 

■  0  if  set  for  delete 

■  1  If  not  set  for  delete 

IRC  :  INTEGER 

The  return  code. 

Returns  the  current  value  of  the  activation  setting  for  the 
specified  entity.  . 


Message  Description 

BAD.ENTJCEY  Given  key  not  an  entity. 

NOT_ENOUGH_ROOM  No  more  core  memory. 
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4.3.6  APPLICATION  FLAG  OPERATIONS 


These  operations  are  used  to  get  or  set  any  application  accessible  flag 
associated  with  an  entity. 

The  Application  Flag  routines  are  shown  In  the  following  table. 


DESCRIPTION 

ROUTINE 

Reset  any  application  accessible  flag  for  all  entitles  In 
the  model . 

MAERST 

Determine  the  value  of  a  given  application  accessible  flag 
of  an  entity. 

MAQURY 

Update  the  value  of  a  given  application  accessible  flag  of 
an  entity  or  list  of  entitles. 

MAUPDT 

Determine  whether  the  user  compresses  with  Its  constituent. 

MAECQY 

Create  a  list  of  constituents  with  which  the  Input  entity 
compresses. 

MAECMP 

Reset  Process  Flag  for  all  entitles  In  the  model. 

MAESWA 

Set  the  Process  Flag  in  an  entity  or  list  of  entitles. 

MAESWT 

Find  the  Process  Flag  setting  of  an  entity. 

MAESVL 

4-33 


UM  560130001 
1  January  1987 


FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


HAERST 


Reset  given  application  accessible  flag  In  all  entitles  In  the 
model . 

MAERST ( FLAGNAME , I RC ) 

INPUT: 

FLAGNAME  :  NAMTYP 

The  nam*  of  the  flag  to  be  reset  In  all  entities 
In  the  model.  Can  have  the  following  values: 

1)  'MRDFLG'  activation  flag 

2)  'PRCFLG'  process  flag 

3)  'ABSFLG'  absent/present  flag 

4)  'APLFLG'  application  flag 

•0  off 
-1  on 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

Determine  what  flag  1$  to 
Resets  that  flag  to  'off'. 

Message 

INVALID  FLAG_NAME 
SCHEMA  ROOT  NIL 
NO  MORE  ROOM 


be  reset  In  every  entity  In  the  model. 


Description 

Given  flag  name  undefined. 
No  model  active. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


MAQURY 


Determine  the  value  of  a  given  application  accessible  flag  for 
the  entity. 

MAQURY(KEY1 , FLAGNAME, FLGVAL, IRC) 

INPUT: 

KEY1  :  ENTKEY 

The  entity  whose  specified  flag  value  Is  to  be 
gotten. 

FLAGNAME  :  NAMTYP 

The  name  of  the  flag  to  be  gotten.  Can  have  the 
following  values: 

1)  'MRDFLG'  activation  flag 

2)  'PRCFLG'  process  flag 

3)  'ABSFLG'  absent/present  flag 

4)  'APLFLG'  application  flag 
•O  off 

•1  on 

OUTPUT: 

FLGVAL  :  INTEGER 

The  value  of  the  specified  flag. 

0  -  false 
1  -  true 

IRC  :  INTEGER 

The  return  code. 


Determine  what  flag's  value  Is  to  be  gotten.  Get  that  flag's 
value. 


Description 


BAD  J.  I ST.REFERENCE 

INVALID.FLAG  NAME 
N0_M0RE_R00M 


Given  reference  nil  or  not  an 
entity. 

Given  flag  name  undefined. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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mm 


Update  the  value  of  a  given  application  accessible  flag  for  an 
entity  or  list  of  entitles. 

MAUPDT(KEY1 , FLGNAME, FLGVAL, IRC) 


INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  whose  specified 
flag  value  will  be  updated. 


FLAGNAME  :  NAMTYP 

The  name  of  the  flag  to  be  updated.  Can  have 
the  following  values: 

1)  'MRDFLG'  activation  flag 

2)  'PRCFLG'  process  flag 

3)  'ABSFLG'  absent/present  flag 

4)  'APLFLG'  application  flag 

-0  off 
-1  on 

FLGVAL  :  INTEGER 

The  value  of  the  specified  flag  to  be  used  when 
updating. 

0  ■  false 
1  •  true 


IRC  :  INTEGER 

The  reutrn  code. 


Determine  what  flag's  value  Is  to  be  updated.  Update  that  flag's 
value. 


Message 


Description 


BAD_LIST_REFERENCE 
INVAL ID_FLAG_NAME 
NO  MORE.ROOM 


Given  key  not  an  entity  or  a  list. 
Given  flag  name  undefined. 

No  more  core  memory. 
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mm 


FUNCTION:  Determine  whether  the  user  compresses  with  Its  constituent. 

FORMAT:  MAECQY(KEY1,  KEY2,  CMPFLG,  IRC) 

INPUT: 

KEY1  :  ENTKEY 

Key  of  the  entity  thats  constituent  is  to  be 
checked. 

KEY2  :  ENTKEY 

Key  of  the  constituent  thats  rule  is  to  be 
checked. 

OUTPUT: 

CMPFLG  :  INTEGER 

Value  of  the  user's  compress  rule  In  relation  to 
Its  constituent. 

1  -  true 
0  -  false 

IRC  :  INTEGER 

Return  code 
0  -  Good  return 
<0  Critical  error 
>0  Warning 

DESCRIPTION:  Query  constituent  compress  rule  to  Its  user. 


FUNCTION: 

FORMAT: 


DESCRIPTION: 
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Create  a  list  of  constituents  with  which  the  Input  entity 
compresses. 

MAECMP{KEY1,  KEY2,  IRC) 

INPUT: 

KEY1  :  ENTKEY 

Key  of  the  entity  thats  compressibility  is 
determined  by  the  constituents(s) . 

OUTPUT: 

KEY 2  :  LISTKEY 

List  of  the  constlutents  that  cause  the 
compression  of  the  Input  entity. 

IRC  :  INTEGER 

Return  code 
0  -  Good  return 
<0  Critical  error 
>0  Warning 

Each  constituent  thats  delete  rule  states  that  the  input  entity 
will  also  be  compressed  will  be  added  to  the  output  list. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 
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haem 

Reset  Process  Flag  for  all  entities  in  the  model. 

MAE SWA (IRC) 

INPUT: 

NONE 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

The  Process  Flag  is  set  to  OFF  in  all  entities  in  the 
working-form  model. 


ERRORS: 


Message 

NO_MORE_ROOM 


Description 
No  more  core  memory. 


FUNCTION: 

FORMAT: 


DESCRIPTION: 
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MAESWT 


Set  the  Process  Flag  in  an  entity  or  a  list  of  entitles. 
MAESWT{KEY1,ISWT, IRC) 


INPUT: 

KEY1 

:  ANYKEY 

The  entity  or  list  of  entities  whose  process 
flag  is  to  be  set. 

ISWT 

:  INTEGER 

The  input  value  of  the  process  flag. 

OUTPUT: 

IRC 

:  INTEGER 

The  return  code. 

The  process  flag  will  be  set  to  the  value  specified  by  ISWT.  If 
KEY1  Is  an  entity  key,  then  the  flag  in  that  entity  will  be  set. 
If  KEY1  is  a  list  key,  then  the  flag  in  all  entities  referenced 
by  the  list  will  be  set.  ISWT  should  be  "1"  for  flag  setting  of 
true  and  "0"  for  flag  setting  of  false. 


ERRORS: 


BAD  l PREFERENCE 
NO_MORE_POOM 


Description 

Given  key  not  an  entity  or  a  list. 
No  more  core  memory. 


FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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mm 


Find  the  Process  Flag  setting  of  an  entity. 
MAESVL(KEY1 , ISET, IRC) 


INPUT: 

KEY1 

:  KEY 

The  entity  for  which  the  flag 
wanted.  This  must  be  an  entity  key. 

setting  is 

OUTPUT: 

ISET 

:  INTEGER 

The  output  value  of  the  process  flag. 

IRC 

INTEGER 

The  return  code. 

The  value  of  the  process  flag  for  KEY1  will  be  returned.  If  the 
flag  Is  true,  then  the  value  "1"  will  be  returned.  If  the  flag 
Is  false,  then  the  value  *0”  will  be  returned. 

Mamas 

Description 

BAD.ENT  KEY 
NO_MORE_ROOM 

Given  key  Is  nil  or  not 
No  more  core  memory. 

an  entity. 
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4.4  LIST  OPERATIONS 

This  section  explains  the  use  of  the  MAS  list  operations.  A  list  Is  a 
temporary  Internal  structure  that  contains  references  to  entitles.  Since  the 
application  can  build  lists  that  take  up  space  In  the  working  model,  it  Is 
necessary  that  the  applications  periodically  delete  the  lists  that  are  no 
longer  needed. 

Many  list  operations  will  accept  either  a  list  key  or  an  entity  key  as  Input 
keys.  When  an  entity  key  Is  supplied.  It  Is  assumed  that  the  constituent  list 
of  the  entity  becomes  the  list  to  be  operated  on. 

Some  operations  on  lists  may  result  In  the  same  entity  being  In  the  output  list 
more  than  once.  The  operation  (MALRDE)  can  be  used  to  remove  duplicate 
entitles  from  the  list. 

All  operations  that  create  an  application  list  automatically  set  the  position 
of  the  list  to  the  beginning.  Once  a  list  has  been  read  to  the  end.  It  must  be 
reset  before  the  sequential  read  process  can  begin  again. 

When  an  entity  Is  deleted,  all  references  to  It  In  all  application  lists  are 
automatically  removed  and  the  current  positions  of  the  affected  lists  are 
adjusted  to  retain  their  original  meaning. 

The  basic  list  operations  can  be  categorized  by  the  following  functions: 

Boolean 

Structure 

General 

Oelete 

Edit 

Sequential  Read 
Execute 

Included  with  the  list  operations  descriptions  are  the  error  and  warning 
messages  that  may  be  returned.  Appendix  A  contains  a  complete  list  of  these 
messages  along  with  their  numeric  codes. 
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4.4.1  BOOLEAN  OPERATIONS 


For  Boolean  operations,  there  are  two  Input  lists  and  one  output  list.  The 
application  Is  responsible  for  providing  two  Input  lists  consisting  with  the 
Boolean  operation  to  be  performed.  No  validation  checking  Is  done.  If  one  or 
both  of  the  Input  lists  contain  duplicate  entitles,  then  the  output  list  may 
also  contain  duplicate  entitles.  This  result  may  not  be  consistent  with  the 
Boolean  theory  operation  being  performed. 

The  Boolean  routines  are  shown  In  the  following  table. 


DESCRIPTION 

ROUTINE 

Create  a  list  from  a  Boolean  "AND*  on  two  Input  lists. 

MALAND 

Create  a  list  from  a  Boolean  "NOT"  on  two  Input  lists. 

MALNOT 

Create  a  list  from  a  Boolean  "OR"  on  two  Input  lists. 

MAIOR 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 

WARNINGS: 


MALAND 


Create  a  list  from  a  Boolean  "AND"  on  two  Input  lists. 

MA LAND ( KEY 1,KEY2,KEY3, IRC) 

INPUT: 

KEY1  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  AND'ed. 

KEY2  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  AND'ed. 

OUTPUT: 

KEY3  :  LISTKEY 

The  list  of  entitles  that  occurred  In  both  KEY1  and 
KEY2. 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  an 
entity  key,  then  the  constituent  list  of  KEY1  is  AND'ed  with 

KEY2.  If  KEY!  Is  a  list  key,  then  KEY1  Is  AND'ed  with  KEY2. 

KEY2  may  be  either  an  entity  key  or  a  list  key.  If  KEY2  is  an 
entity  key  then  the  constituent  list  of  KEY2  is  AND'ed  with 

KEY1.  If  KEY 2  Is  a  list  key  then  KEY 2  Is  AND'ed  with  KEY2.  The 
list  KEY3  Is  created,  corresponding  to  the  set  theoretical 
intersection  of  KEY1  and  KEY2. 

Message  Description 

BAD„LI$T_REFERENCE  Given  key(s)  nil  or  not  a  list. 

NO_MORE_ROOM  No  more  core  memory. 

NO.LIST.CREATED 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


WARNINGS: 
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MALM 


Create  a  list  from  a  Boolean  "NOT”  on  two  Input  lists. 
MALNOT (KEY 1 , KEY2 , KEY3 , I RC ) 

INPUT: 

KEY1  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  NOT'ed. 
KEY 2  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  NOT'ed. 


OUTPUT: 

KEY3  :  LISTKEY 

The  list  of  entitles  that  occurred  In  KEY1  but  not 
In  KEY2. 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  an 
entity  key,  then  the  constituent  list  of  KEY1  is  NOT'ed  with 

KEY2.  If  KEY1  Is  a  list  key,  then  KEY1  Is  NOT'ed  with  KEY2. 
KEY 2  may  be  either  an  entity  key  or  a  list  key.  If  KEY 2  is  an 
entity  key,  then  the  constituent  list  of  KEY2  is  NOT'ed  with 

KEY1.  If  KEY2  Is  a  list  key,  then  KEY 2  Is  NOT'ed  with  KEY1.  The 

list  KEY3  Is  created,  corresponding  to  the  set  theoretical 

difference  of  KEY1  and  KEY2. 

fj.gS.SA98 

BAD _L I ST_REFERENC  E 
BAD  ENT  KEY 
NO_MORE_ROOM 

NO_LI$T_CREATED 


BsssrlPtlan 

Given  key  not  an  entity  or  a  list. 
Given  key  nil. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS 


WARNINGS: 
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MLflfi 


Create  a  list  from  a  Boolean  "OR"  on  two  Input  lists. 
MAL0R(KEY1,KEY2,KEY3,IRC) 

INPUT: 

KEY1  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  OR'ed. 

KEY 2  :  ANYKEY 

An  entity  or  a  list  that  Is  to  be  OR'ed. 

OUTPUT: 

KEY3  :  LISTKEY 

The  list  of  entitles  that  occurred  In  either  KEY1  or 
KEY2. 

IRC  :  INTEGER 

The  return  code. 


KEY  1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  an 
entity  key,  then  the  constituent  list  of  KEY1  is  OR'ed  with 
KEY2.  If  KEY1  Is  a  list  key,  then  KEY1  Is  OR'ed  with  KEY2.  KEY2 
may  be  either  an  entity  key  or  a  list  key.  If  KEY2  is  an  entity 
key,  then  the  constituent  list  of  KEY2  Is  OR'ed  with  KEY1.  If 
KEY2  Is  a  list  key,  then  KEY2  Is  OR'ed  with  KEY1.  The  list  KEY3 
is  created,  corresponding  to  the  set  theoretical  union  of  KEY1 
and  KEY2.  If  there  is  an  entity  in  KEY1  that  is  also  in  KEY2, 
there  will  be  duplicates  in  KEY3. 


Message 


•  Description 


BAD_LIST_REFERENCE 
BAD  ENT  KEY 
NO_MORE__ROOM 


Given  key  not  an  entity  or  a  list. 
Given  key(s)  nil . 

No  more  core  memory. 


NO_tIST_CREATED 
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4.4.2  STRUCTURE  OPERATION 

The  following  table  presents  the  structure  routines: 


DESCRIPTION 

ROUTINE 

Create  a  list  of  entitles  with  a  given  KIND. 

MALK 

Create  a  list  of  entitles  with  a  given  KIND  that  are  found 
within  another  list. 

MALKL 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


WARNINGS: 
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Create  a  list  of  entitles  with  a  given  KINO. 

MALK(KIND,KEY1,IRC) 

INPUT: 

KIND  :  INTEGER 

A  valid  KINO  code  that  may  be  either  the  KIND  of  an 
entity  or  class  of  entitles. 

OUTPUT: 

KEY1  :  LISTKEY 

The  list  of  all  entitles  of  the  specified  KIND. 

IRC  :  INTEGER 

The  return  code. 


KEY1  Is  created.  KEY1  will  contain  all  entitles  of  KIND.  If  a 
data  dictionary  Is  specified,  then  the  KINO  may  be  a  class  of 
enltles.  In  this  case,  the  elements  of  the  list  will  be  a 
(logical)  concatenation  of  the  content  of  each  entity  class  as 
they  are  encountered  from  left  to  right  In  the  entity  class 
structure. 


Description 


CANT.CREATE  LIST 
BAO_SCHEMA_KIND 
BAD  LIST_POSITION 
NO_MORE_ROOM 


Given  kind  undefined. 

Given  not  of  an  Instance  or  class. 
Schema  root  Inconsistent. 

No  more  core  memory. 


NO  SUCH  SCHEMA  Kind  undefined. 

NO_LIST_CREATED 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 

WARNINGS: 


m&L 


Creata  a  list  of  entitles  with  a  given  KINO  that  are  found  within 
another  list. 


MALKI(KEY1,  KINO,  KEY2,  IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  whose  list  is  to  be 
searched  for  the  specified  KIND. 

KINO  :  INTEGER 

The  KIND  code  of  an  entity  or  an  entity  class. 

OUTPUT: 

KEY2  :  LISTKEY 

The  list  that  will  contain  all  entitles  of  the  given 
KINO  found  within  the  list  specified  by  KEY1. 

IRC  :  INTEGER 

The  return  code. 

If  KEY1  is  an  entity  key,  put  all  constituents  of  entity  KEY1 
into  KEY 2  that  match  on  kind.  If  KEY1  is  a  list  key,  put  all 
entities  in  the  KEY1  list  into  KEY2  that  match  on  kind. 


Massage 


Dassrlotlon 


BAO_ENT_KIND 

BADJ.IST_REFERENCE 

BAD_L I$T_P0SITI0N 
NO_MORE_ROOM 

NO_lIST_CREATED 


No  such  kind. 

Given  key  nil  or  not  an  entity  or 
not  a  list. 

Schema  root  inconsistent. 

No  more  core  memory. 
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4.4.3  GENERAL  OPERATIONS 

The  following  table  presents  the  general  routines: 


DESCRIPTION 

ROUTINE 

Creates  an  empty  list. 

MAL 

Create  an  empty  list  of  specified  size. 

MALN 

Makes  a  copy  of  a  list. 

MALCPY 

Find  the  position  of  an  entity  in  a  list. 

MALFND 

Count  the  entities  In  a  list. 

MALNO 

Get  the  Nth  key  from  a  list. 

MALGTK 
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HAL 


FUNCTION:  Creates  an  empty  list. 

FORMAT:  MAL(KEY1,IRC) 

INPUT: 

None 


OUTPUT: 

KEY1  :  IISTKEY 

The  key  of  the  empty  list. 

IRC  :  INTEGER 

The  return  code. 


DESCRIPTION:  An  empty  list  Is  created. 
EXAMPLE:  See  Sample  Programs  Section. 

ERRORS: 

CANT_CREATE_L I ST 
NO_MORE_ROQM 


BsssrMM 

Memory  allocation  problems. 
No  more  core  memory. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 
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mu 


Create  an  empty  list  of  specified  size. 
MALN(LSIZE,KEY1,IRC) 

INPUT: 

LSIZE:  INTEGER 

The  number  of  entries  In  the  list. 


OUTPUT: 

KEY1  :  LISTKEY 

The  key  of  the  empty  list  of  specified  size. 

IRC  :  INTEGER 

The  return  code. 

An  empty  application  list  will  be  created  with  sufficient  space 
to  accommodate  LSIZE  entries.  All  entries  are  initialized  to 
nil . 


Message 


Description 


CANT  CREATE  LIST 
MAXIMUM  LIST.SIZE 
NO  MORE  ROOM 


Memory  allocation  problems. 
Requested  size  too  large. 

No  more  core  memory. 
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FUNCTION:  Makes  a  copy  of  a  list. 


FORMAT:  MALCPY(KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  LISTKEY 

A  list  key  whose  entries  will  be  copied. 

OUTPUT: 

KEY2  :  LISTKEY 

The  new  list  that  will  receive  a  copy  of  KEY1. 

IRC  :  INTEGER 

The  return  code. 


DESCRIPTION:  KEY2  will  be  created.  The  elements  of  KEY1  will  be  copied  into 
KEY2. 


ERRORS :  Message 


Description 


BAD_LIST_REFERENCE  Given  key  nil  or  not  a  list. 

NO_MORE_ROOM  No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


MALFND 


Find  the  position  of  an  entity  In  a  list.  If  KEY1  Is  an  entity 
then  find  Its  position  In  the  constituent  list  of  that  entity. 

MALFND(KEY1,KEY2,IFIRST, IPOS, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  In  which  KEY2  is  to  be 
found. 


KEY2  :  ENTKEY 

The  entity  to  be  founo  in  KEY1. 

I FIRST  :  INTEGER 

The  position  In  KEY1  where  the  find  operation  is  to 
start. 


OUTPUT: 

IPOS  :  INTEGER 

The  position  In  KEY1  where  KEY2  Is  found. 

IRC  :  INTEGER 

The  return  code. 


KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  a 
list  then  KEY2  Is  found  In  the  list.  If  KEY1  Is  an  entity,  then 
KEY2  is  found  in  the  constituent  list  of  KEY1.  KEY2  must  be  an 
entity  key.  The  find  starts  at  position  IFIRST.  Each  entity  in 
KEY1  is  examined  for  equality  with  KEY2  starting  with  the 
specified  position.  If  a  match  is  found,  then  the  position  is 
returned  In  IPOS.  If  there  is  no  match,  then  IPOS  Is  returned  as 
zero  and  IRC  signals  an  error.  If  there  are  multiple  matches, 
then  only  the  first  (leftmost;  match  is  retur  led  in  IPOS. 


Message 


Description 


NO  MATCH  FOUNO 
BAD_l I ST_RE  F  ERENC  E 

BAO  ENT  KEY 
NO.MORE.ROOM 


Entity  not  on  list. 

Given  key(s)  not  an  entity  or  a 
list. 

Given  key(s)  Is  nil . 

No  more  core  memory. 


UM  560130001 
1  January  1987 


FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

ERRORS: 


mM 


Count  the  entitles  In  a  list. 

MALNO ( KEY 1 , KOUNT , I RC ) 

INPUT: 

KEY1  :  ENTKEY 

The  entity  or  list  of  entitles  to  be  counted 

OUTPUT: 

KOUNT:  INTEGER 

The  number  of  entitles  in  the  list. 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  an 
entity  the  number  of  constituents  Is  returned.  If  KEY1  Is  a  list 
the  number  of  entities  on  the  list  Is  returned. 

See  Sample  Programs  Section. 

Message  DescrlgtJon 

BADJ.IST_REFERENCE  Given  key(s)  Is  nil  or  is  not  an 

entity  or  a  list. 

NO_MORE_ROOM  No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

ERRORS: 
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malgtk 


Get  the  Nth  Key  from  a  list. 

MALGTK(KEY1 , IPOS, KEY2, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entities  to  be  processed. 
IPOS  :  INTEGER 

The  position  in  the  list  of  the  target  entity. 


OUTPU”: 

KEY2  :  ENTKEY 

The  requested  key. 

IRC  :  INTEGER 

The  return  code. 


If  KEY1  is  a  list,  get  the  IPOS  entry  from  the  list.  If  KEY1  Is 
an  entity,  get  the  IPOS  entry  from  the  constituent  list  of  KEY1. 

See  Sample  Programs  Section 


Message 


Description 


BAD_L I ST_POS IT ION 

BAD_LIST_REFERENCE 

NO_MORE_ROOM 


Given  position  beyond  the  length  cf 
list. 

Given  key(s)  is  nil  or  is  not  an 
entity  or  a  list. 

No  more  core  memory. 
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4.4.4  DELETE  OPERATIONS 

The  following  table  presents  the  delete  routines: 


DESCRIPTION 

ROUTINE 

Delete  an  application  list. 

MALD 

Delete  all  application  lists. 

MALDA 

Delete  an  application  list  and  all  lists  created  after  It. 

MALDI 

Set  or  unset  the  application  list  lock  flag,  v 

MALOCK 

FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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Delete  an  application  list. 
MALD(KEYl.IRC) 

INPUT: 

KEY1  :  LISTKEY 

The  list  to  be  deleted. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

KEY1  must  not  be  an  entity  key.  KEY1  Is  deleted.  KEY1  cannot  be 
recovered. 


Mss sane 

BAD_DELETE_KEY 

NO_MORE_ROOM 


Description 

Given  key  not  a  root,  entity,  or 
list. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 
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mm 


Delete  all  application  lists. 

MALDA(IRC) 

INPUT: 

None 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

All  application  lists  will  be  deleted.  They  cannot  be 
recovered.  If  an  application  list  Is  locked,  then  it  will  not  be 
deleted. 


Message 


Description 


BAD  LIST  POSITION 
BADJ.IST  REFERENCE 
NO  MORE_ROOM 


Error  In  processing  lists. 
Found  nil  list  pointer. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


mu 


Delete  an  application  list  and  all  lists  created  after  It. 
MALDI(KEYl.IRC) 

INPUT: 

KEY1  :  LISTKEY 

The  list  to  be  deleted. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


KEY1  must  not  be  an  entity  key.  The  list  Identified  by  KEY1  and 
all  lists  created  after  It  will  be  deleted.  Deleted  lists  cannot 
be  recovered.  If  an  application  list  Is  locked,  then  It  will  not 
be  deleted. 


Message 


Description 


BADJ.IST  POSITION 
BAOJ.IST.REFERENCE 

BAD_DELETE_IIST 
BAD.ENT  KEY 
NO.MORE  ROOM 


Error  In  processing  lists. 

Given  key  Is  nil  or  not  in  stack  of 
lists  or  Is  not  a  list. 

Given  key  Is  nil. 

Found  a  nil  list. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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MALOCK 


Set  or  unset  the  application  list  lock  flag. 
MAL0CK(KEY1, LOCK, IRC) 

INPUT: 

KEY1  :  LISTKEY 

The  list  to  be  set. 

LOCK  :  INTEGER 

The  lock  setting 
-0  unlocked 
-1  locked 

OUTPUT: 

IRC  :  INTEGER 

The  return  code 


A  list  that  Is  locked  will  not  be  deleted  by  the  Interface 
functions  MALDA  or  MALOI.  All  other  functions  that  delete  lists 
will  delete  a  locked  list. 


Message 


Description 


BAD_LIST_REFERENCE  Given  key  Is  not  a  list  or  is  nil . 

NO_MORE_ROOM  No  more  core  memory. 
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4.4.5  EDIT  OPERATIONS 

The  following  table  presents  the  edit  routines: 


DESCRIPTION 

ROUTINE 

Attach  an  entity  or  list  of  entitles  to  a  list. 

MALATC 

Insert  an  entity  or  list  of  entitles  Into  a  list. 

MALINS 

Remove  duplicate  entries  In  a  list. 

MALRDE 

Replace  a  list. 

MALREP 

Remove  an  entity  from  a  list. 

MAIRMV 

Reorder  list  of  entitles  In  user  to  constituent  order. 

MALROR 

Replace  an  entity  In  a  list. 

MALRPl 

Reverse  the  order  of  a  list 

MALRVS 

Sorts  a  list  using  order  provided  by  a  user  defined  function 

MALSRT 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

EXAMPLE: 

ERRORS: 


HALAIC 


Attach  an  entity  or  list  of  entitles  to  a  list.  If  KEY1  Is  an 
entity  then  attach  to  the  constituent  list  of  that  entity. 

MALATC(KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entities  to  which  KEY2  is  to  be 
attached. 

KEY2  :  ANYKEY 

The  entity  or  list  to  be  attached  to  KEY1. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  a 
list,  then  KEY2  Is  attached  to  the  list.  If  KEY1  is  an  entity, 
then  KEY2  Is  attached  to  the  constituent  list  of  KEY1.  This  will 
make  KEY 2  a  constituent  of  KEY1.  KEY2  may  be  either  an  entity 
key  or  a  list  key.  If  KEY2  is  a  list,  then  the  entire  list  is 
attached  to  KEY1.  This  Is  the  same  as  doing  multiple  attaches  of 
an  entity.  If  KEY2  Is  an  entity,  then  the  entity  Is  attached  to 
KEY1. 


See  Sample  Programs 

INVALID  CONNECTION 
CANT  CONNECT 
BAO.ENT  KEY 
NO  MORE  ROOM 


Section. 

Oessrlation 

Given  key  Is 
Given  key  Is 
Given  key(s) 
No  more  core 


nl  1 . 

not  an  entity  or  list. 

Is  nil . 

memory. 


r 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


ERRORS: 


mim 


Insert  an  entity  or  list  of  entitles  Into  a  list.  If  KEY1  Is  an 
entity,  then  Insert  Into  the  constituent  list  of  that  entity. 

MAUNS(KEY1,KEY2,  IPOS,  IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  In  which  KEY2  is  to  be 
inserted. 


KEY 2  :  ANYKEY 

The  entity  or  list  to  be  inserted  in  KEY1. 

IPOS  :  INTEGER 

The  position  in  KEY1  where  the  insert  is  to  take 
place. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  a 
list,  then  KEY2  Is  Inserted  In  the  list.  If  KEY1  is  an  entity, 
then  KEY2  Is  Inserted  in  the  constituent  list  of  KEY1.  KEY2  may 
be  either  an  entity  key  or  a  list  key.  If  KEY2  Is  a  list,  then 
the  entire  list  is  Inserted  in  KEY1.  If  KEY2  Is  an  entity,  then 
the  entity  Is  Inserted  In  KEY1. 

The  Insert  takes  place  before  IPOS.  That  is,  the  entity  at  IPOS 
Is  moved  by  one  position  If  KEY2  Is  an  entity  or  by  the  number  of 
elements  In  the  list  If  KEY2  Is  a  list.  Then  the  elements  are 
moved  into  the  vacated  positions. 


Description 


BADJ.IST.POSITION 

BAD _L I ST_REFERENCE 
INVALID_CRB_POSITION 

CRB  POSITION  NOT  FOUND 
NO_MORE_ROOM 


Given  position  less  than  1  or 
greater  than  length. 

Given  key  is  nil. 

Pointer  to  position  of  last  read  at 
constituent  list  is  Inconsistent. 

No  pointer  to  read  position  found. 

No  more  core  memory. 


4-64 


UM  560130001 
1  January  1987 


malroe 


FUNCTION:  Remove  duplicate  entries  In  a  list. 

FORMAT:  MALRDE(KEY1, IRC) 

INPUT: 

KEY1  :  LISTKEY 

The  Input/output  list. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

DESCRIPTION:  Any  duplicate  entities  found  in  the  Input  list  will  be  removed. 

The  change  Is  made  In-place.  The  first  Instance  of  each  entity 
will  be  kept. 

ERRORS:  Message  Description 

BAD  LIST  REFERENCE  Given  key  Is  not  a  list. 

DUPL I C ATES_NOT_REMOV  ED 

NO_MORE_ROOM  No  more  core  memory. 


ft 
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MALREP 


FUNCTION: 

FORMAT: 


Replace  a  list.  If  KEY1  is  an  entity  then  replace  the 
constituent  list  of  that  entity. 

MALREP{KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  replaced. 

KEY2  :  ANYKEY 

The  entity  or  list  to  replace  KEY1. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


DESCRIPTION:  KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  Is  a 
list  then  KEY2  replaces  KEY1.  If  KEY1  Is  an  entity  then  the 
constituent  list  of  KEY1  Is  replaced  by  KEY2.  KEY2  may  be  either 
an  entity  or  a  Hit  key. 

ERRORS:  Message  Description 


BAD_UST_REFERENCE 

INVALID_CRBJ>OSITION 

CRB_POSITION  NOT.FOUND 
BAD  ENTJCEY 
NO  MORE  ROOM 


Given  key(s)  is  nil  or  not  an 
entity  or  a  list. 

Pointer  to  position  of  last  read  of 
constituent  list  Is  inconsistent. 

No  pointer  to  read  position  found. 
Given  key(s)  Is  nil. 

No  more  core  memory. 
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WLRHV 


FUNCTION:  Remove  an  entity  from  a  list.  If  KEY1  Is  an  entity,  then  remove 

It  from  the  constituent  list  of  that  entity. 

FORMAT:  MALRMV ( KEY 1, IPOS, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  from  which  an  entity 
Is  to  be  removed. 

IPOS  :  INTEGER 

The  position,  in  the  list,  of  the  entity  to  be 
removed. 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

DESCRIPTION:  KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  a 
list  then  an  entity  Is  removed  from  the  list.  If  KEY1  is  an 
entity  then  an  entity  is  removed  from  the  constituent  list  of 
KEY1.  IPOS  Is  the  position  number  of  the  entity  to  be  removed. 
The  MAS  delete  rules  are  used  to  see  If  the  entity  can  be  removed 
from  the  constituent  list. 

ERRORS:  Message  Description 

BADJ.ISTJ>OSITION  Remove  position  •  0  or  is  greater 

than  length. 

BAD_LIST_REFERENCE  Given  key  Is  not  an  entity  or  a 

list. 

INVALID_DEIETE  Delete  rule  prohibits  delete. 

INVALID_CRB_POSITION  Pointer  to  position  of  last  read  of 

constituent  list  Is  inconsistent. 
CRB_ENTRY_N0T_F0UND  Pointer  to  read  position  not  found, 

RULE_DOE$_NOT_MATCH  Rules  Incorrectly  defined. 

NO_MORE_ROOM  No  more  core  memory. 


FUNCTION: 

FORMAT: 
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mm 


Reorder  a  list  of  entitles  so  that  the  users  appear  at  the  head 
of  the  list. 

MALROR(KEYL,  IRC) 

INPUT: 

KEYt  :  LISTKEY 

Key  of  an  application  list. 

OUTPUT: 

RC  :  INTEGER 

Return  code 
0  •  Good  return 
<0  Critical  error 
>0  Warning 


DESCRIPTION:  For  each  member  of  the  list,  search  each  of  the  remaining  members 
for  Its  users;  put  users  at  the  head  of  the  list. 
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MLRPL 


FUNCTION:  Replace  an  entity  In  a  list.  If  KEY1  Is  an  entity  then  replace 

In  the  constituent  list  of  that  entity. 

FORMAT:  MALRPL(KEY1,KEY2, IPOS, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entities  in  which  an  entity  Is 
to  be  replaced. 

KEY 2  :  ENTKEY 

The  entity  that  will  replace  an  entity  In  KEY1. 

IPOS  :  INTEGER 

The  position  of  the  entity  in  KEY1  to  be  replaced. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


DESCRIPTION:  KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  is  a 
list,  then  an  entity  Is  replaced  in  the  list.  If  KEY1  is  an 
entity,  then  an  entity  is  replaced  In  the  constituent  list  of 
KEY1.  KEY2  must  be  an  entity  key.  The  entity  at  position  IPOS 
In  KEY1  will  be  replaced  by  KEY2.  If  the  entity  being  replaced 
is  "MARKED  FOR  DELETE,"  then  an  attempt  Is  made  to  delete  the 
entity. 


ERRORS: 

BAD _L I ST_POS IT ION 

BADJLISTJIEFERENCE 

INVALIDJJELETE 

INVALIO_CRB_POSITIQN 

CRB  ENTRY_NOT  FOUND 
RULE_DOES_NOT_MATCH 
NO  MORE  ROOM 


Description 

Remove  position  -  0  or  Is  greater 
than  length. 

Given  key  is  not  an  entity  or  a 
list. 

Delete  rule  prohibits  delete. 

Pointer  to  position  of  last  read  of 
constituent  list  is  Inconsistent. 
Pointer  to  read  position  not  found. 
Rules  Incorrectly  defined. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 

WARNING: 
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mm 


Reverse  the  order  of  the  entitles  In  a  list. 

MALRVS(KEYl.IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  In  which  the  order  of 
the  entitles  Is  to  be  reversed. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

KEY1  may  be  either  an  entity  key  or  a  list  key.  If  KEY1  Is  a 
list,  then  the  list  Is  reversed.  If  KEY1  Is  an  entity,  then  the 
constituent  list  Is  reversed. 


Message 


Description 


BAD _l I ST_REFERENCE 
NO_MORE_ROOM 


Given  key  Is  nil  or  not  an  entity 
or  a  list. 

No  more  core  memory. 


NO_lIST_CREATED 


Given  list  Is  empty. 
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FUNCTION: 

FORMAT: 

DESCRIPTION: 

ERRORS: 

WARNING: 
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MfllSRI 


Sorts  an  entity  list  using  the  order  given  In  a  user  defined 
function. 

MALSRT (KEY 1 , KEY2 , IRC ) 

INPUT: 

KEY1  :  ANYKEY 

The  list  of  entity  or  applications  to  be  sorted. 

KEY2  :  The  name  of  the  user  defined  function  for  ordering 
the  list 

OUTPUT: 

IRC  :  INTEGER 

The  return  code. 

This  routine  references  a  user  defined  function  which  provides 
the  order  sequence  to  be  applied  to  the  list  to  be  sorted. 


ttessaaa 


PgscclpUQD 


BAD_LIST_REFERENCE 

NO_MORE_ROOM 


Given  key  Is  nil  or  not  an  entity 
or  a  list. 

No  more  core  memory. 


NOJ.IST.CREATED 


Given  list  is  empty. 
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4.4.6  SEQUENTIAL  READ  AND  EXECUTE  OPERATIONS 

The  following  table  shows  routines  that  process  a  list  sequentially  (as  If  It 
were  a  file): 


DESCRIPTION 

ROUTINE 

Read  the  next  entry  In  a  list. 

MALRD 

Setup  for  reading  In  a  forward  direction. 

MALSTF 

Setup  for  reading  In  reverse  direction. 

MALSTR 

Execute  a  procedure  on  an  entity  or  a  list  of  entitles. 

MAEXEQ 

Execute  a  procedure  on  all  entitles  of  a  specified  KIND. 

MAKXEQ 

Execute  a  procedure  on  an  entity  or  a  list  of  entitles. 

MALXEQ 

Execute  a  given  procedure  on  constituents  of  entity. 

MAECXQ 

Execute  a  procedure  on  the  users  of  an  entity. 

MAEUXQ 

_ 

The  MALSTF  and  MALSTR  set  up  a  list  for  forward  or  reverse  reading  of  an 
application  list.  Forward  reading  is  assumed  and  need  not  be  called  explicitly 
before  a  read  or  an  execute  function  Is  used.  However,  after  an  end-of-llst  is 
signaled,  the  list  Is  disabled.  An  explicit  setup  must  be  done  to  enable  the 
list. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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mm 


Read  the  next  entry  In  a  list. 

MALRD(KEY1,KEY2,IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  read. 

OUTPUT: 

KEY2  :  ENTKEY 

The  entity  of  the  next  list  entry.  Next  depends  on 
the  direction  of  the  read  set  by  MALSTF  or  MALSTR. 

IRC  :  INTEGER 

The  return  code. 

The  next  entity  In  the  list  is  returned.  Always  set  the 
direction  by  using  MALSTF  or  MALSTR  before  the  first  time  this 
routine  Is  used  to  read  a  list. 


D&SflCMlflO 


BAD_L I ST_REFERENCE 

INVALID_CRB_POSITION 

CRB  ENTRY  N0T_F0UND 
NO_MORE_ROOM 


Given  key  Is  nil  or  not  an  entity 
or  a  list. 

Pointer  to  position  of  last  read  of 
constituent  list  is  inconsistent. 
Pointer  to  read  position  not  found. 
No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 
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MALSTF 


Setup  for  reading  In  forward  direction. 

MALSTF (KEY 1, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  processed  in  a 
forward  direction. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


If  KEY1  is  an  entity,  then  the  constituent  list  of  KEY1  will  be 
set  up. 


Message 


Description 


BAD J.  I ST_REFERENCE 

BADJ-NT  KEY 
INVALID_CRB_POSITION 

CRB_ENTRY_NOT_FOUND 

NO_MORE_ROOM 


Given  key  Is  not  an  entity  or  a 
list. 

Given  key  Is  nil. 

Pointer  to  position  of  last  read  of 
constituent  list  Is  inconsistent. 
Pointer  to  direction  of  read  not 
found. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 


HALSIB 


Setup  for  reading  In  reverse  direction. 

MALSTR(KEY1, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  processed  in  the 
reverse  direction. 


OUTPUT: 

IRC  :  INTEGER 

The  return  code. 


If  KEY1  Is  an  entity  then  the  constituent  list  of  KEY1  will  be 
setup. 

We 5 saga  Description 


BAD J.  I ST_REFERENCE 

BAD_ENT_KEY 

INVALID_CRB_POSITION 

CRB_ENTRY_NOT_FOUND 

NO_MORE_ROOM 


Given  key  Is  not  an  entity  or  a 
list. 

Given  key  Is  nil. 

Pointer  to  position  of  last  read  of 
constituent  list  Is  Inconsistent. 
Pointer  to  direction  of  read  not 
found. 

No  more  core  memory. 
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The  application-supplied  procedure  Invoked  by  the  "execute"  functions  must 
conform  to  the  declaration  shown  below: 

Procedure  PROC (KEY , ENTDEF , DATA , IRC) 

INPUT: 

1)  KEY  is  an  entity  key. 

2)  ENTDEF  Is  the  entity  ADB  declaration. 

3)  DATA  Is  a  variant  data  structure  used  as  needed  by  the 
procedure.  DATA  Is  the  Input  data  structure  passed  originally 
to  an  EXECUTE  function. 


OUTPUT: 

1)  IRC  Is  the  return  code  produced  by  the  "PROC". 


The  application  procedure  called  from  MAEXEQ  and  NAKXEQ  have  the  following 
return  code  values: 


RCC  >-0  and  RCC  <-7 
processing  OK 

The  EXECUTE  routine  continues  processing. 

RCC  >-8  and  RCC  <-15 
procedure_code_error 
The  EXECUTE  routine  halts  processing. 

RCC  <  0  or  RCC  >  15 

procedure_out_ofjrange 
The  EXECUTE  routine  halts  processing. 

The  application  procedure  called  from  MALXEQ  has  the  following  return  code 
values: 


RCC  •  0  or  RCC  -  1 
processing  OK 

The  EXECUTE  routine  adds  an  entity  to  the  output  list  and 
continues  processing. 

RCC  >-2  and  RCC  <>7 

procedure_wam1ng_code 
The  EXECUTE  routine  continues  processing. 

RCC  >»8  and  RCC  <>15 
procedure_code_error 
The  EXECUTE  routine  halts  processing. 
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FUNCTION:  Execute  a  procedure  on  a  entity  or  a  list  of  entitles. 

FORMAT:  MAEXEQ (KEY1, DATA, PROC, RCC, IRC) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  on  which  the 
application  procedure  should  be  performed. 


DATA  :  VARIANT 

The  application  defined  data  structure  which  either 
supplies  or  receives  the  values  operated  on  by  the 
application  defined  procedure. 


PROC  :  ENTRY  POINT 

The  entry  point  of  an  application  defined  procedure. 


OUTPUT: 

RCC  :  INTEGER 

The  procedure  PROC  return  code. 

IRC  :  INTEGER 

The  MAS  return  code. 


DESCRIPTION:  The  entity,  or  each  entity  In  a  list.  Is  passed  to  the 
application-defined  procedure.  The  operation  performed  on  the 
entity  Is  determined  by  the  application-defined  procedure. 


EXAMPLE: 

See  Sample  Programs  Section 

ERRORS: 

Measifle 

BADJ.IST_REFERENCE 

PROC.CODE  ERROR 

PROC  OUT  OF  RANGE 

NO  MORE  ROOM 

Description 

Given  key  Is  nil  or  not  an  entity 
or  a  list. 

Return  error  code  greater  than  15. 

No  more  core  memory. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 

ERRORS: 

WARNING: 


mm 


Execute  a  procedure  on  all  entitles  of  a  specified  kind. 
MAKXEQ(KINO, DATA, PROC, RCC, IRC) 

INPUT: 

KIND  :  INTEGER 

The  KINO  value  of  the  entities  to  be  processed. 

DATA  :  VARIANT 

The  application-defined  data  structure,  which  either 
supplies  or  receives  the  values  operated  on  by  the 
application-defined  procedure. 

PROC  :  ENTRY  POINT 

The  entry  point  of  an  application-defined  procedure. 

OUTPUT: 

RCC  :  INTEGER 

The  procedure  PROC  return  code. 

IRC  :  INTEGER 

The  MAS  return  code. 


Each  entity  of  the  specified  kind  Is  passed  to  the 
application-defined  procedure.  The  operation  performed  on  the 
entity  is  determined  by  the  application-defined  procedure. 


Wei sags 

BAO_L I ST_P0S IT I ON 
PRQC_CODE  ERROR 
PR0C_0UT_0F_RANGE 

NO_MORE_ROOM 

NO.SUCH.SCHEMA 


DaisrMlfln 

Schema  inconsistent. 

Returned  error  cede  greater  than 
15. 

No  more  core  memory. 

No  definition  for  given  kind. 
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DESCRIPTION: 
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Execute  a  procedure  on  a  entity  or  a  list  of  entitles.  Construct 
an  output  list  of  entitles  as  determined  by  the  application 
procedure. 

MALXEQ ( KEY 1 , DATA , PROC , KEY 2 , RCC , I RC ) 

INPUT: 

KEY1  :  ANYKEY 

The  entity  or  list  of  entitles  to  be  processed. 

DATA  :  VARIANT 

The  application-defined  data  structure,  which  either 

supplies  or  receives  the  values  operated  on  by  the 

application-defined  procedure. 

PROC  :  ENTRY  POINT 

The  entry  point  of  an  application-defined  procedure. 

OUTPUT: 

KEY 2  :  LISTKEY 

The  list  created  by  this  function. 

RCC  :  INTEGER 

The  procedure  PROC  return  code. 

IRC  :  INTEGER 

The  return  code  produced  by  this  operation. 

An  empty  list  (KEY2)  Is  created.  The  entity,  or  each  entity  in 
sequence  If  a  list  Is  supplied.  Is  passed  to  the 
application-defined  procedure.  The  operation  performed  on  the 
entity  Is  determined  by  the  application-defined  procedure.  When 
the  application  return  code  of  "success,"  (0  or  1),  is  returned 
from  the  application  procedure,  the  entity  just  processed  is 
added  to  the  result  list.  When  an  application  error  return  code 
(less  than  0  or  greater  than  7)  Is  returned  from  the  application 
procedure,  MALXEQ  Is  terminated.  When  an  application  warning 
return  code  (2  through  7)  is  returned  from  the  application 
procedure,  the  entity  just  processed  Is  not  placed  on  the  result 
list,  but  processing  continues. 
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MALXE0  l Cont.l 


ERRORS: 

Message 

BAD_LIST_REFERENCE 

BAO.ENTJCEY 

PROC  CODE  ERROR 
PR0C_0UT_0F_RAN6E 

INVALID_CRB_P0SITI0N 

CRB_POS_NOT_FOUND 

NO_MORE_ROOM 

WARNING: 

PROC  WARNING.C0DE 
NO.LlST.CREATED 

Description 

Given  key  Is  not  an  entity  or  a 
list. 

Given  key  Is  nil. 

Returned  error  code  greater  than 
15. 

Pointer  to  position  of  read  of  the 
constituent  list  Inconsistent. 
Pointer  to  position  of  read  not 
found. 

No  more  core  memory. 


No  entitles  executed  sucessfully. 
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FUNCTION:  Given  a  user-defined  procedure,  perform  this  procedure  on  the 

constituents  of  an  entity  or  list  of  entitles. 

FORMAT:  MAECXQ(KEY1,  OATAREC,  PROCNM,  KEY2,  RRC,  IRC) 

INPUT: 

KEY1  :  ANYKEY 

Key  of  an  entity  or  an  application  list  thats 
constituent (s)  are  to  be  processed. 

DATAREC  :  BLKDATA 

Data  to  be  supplied  to  the  procedure. 

PROCNM  :  ROUTINE 

Routine  supplied  by  caller  that  processes  one 
entity  at  a  time. 

OUTPUT: 

KEY 2  :  LISTKEY 

Key  to  the  list  of  constituents  that  processed 
without  error. 

RRC  :  INTEGER 

Return  code  of  the  user-defined  procedure. 

IRC  :  INTEGER 

Return  code 
0  -  Good  return 
<0  Critical  error 
>0  Warning 


DESCRIPTION:  For  each  constituent  of  an  entity  read  from  the  position  and  In 
the  direction  Indicated  In  Its  user  constituent  list,  process  by 
the  user-defined  procedure.  For  each  entity  processed  without 
error,  add  to  the  output  list. 


4-81 


FUNCTION: 

FORMAT: 


DESCRIPTION: 


UM  560130001 
1  January  1987 


maeuxq 


Given  a  user-defined  procedure,  perform  this  procedure  on  the 
users  of  an  entity  or  list  of  entitles. 

MAEUXQ ( KEY 1,  OATAREC,  PROCNM,  KEY2,  RRC,  IRC) 

INPUT: 

KEY1  :  ANYKEY 

Key  of  an  entity  or  an  application  list  thats 
user(s)  are  to  be  processed. 

OATAREC  :  BLKDATA 

Data  to  be  supplied  to  the  procedure. 

PROCNM  :  ROUTINE 

Routine  supplied  by  the  caller  that  processes  one 
entity  at  a  time. 

OUTPUT: 

KEY 2  :  LISTKEY 

Key  to  the  list  of  users  that  processed  without 
error. 

RCC  :  INTEGER 

Return  code  of  the  user-defined  procedure. 

IRC  :  INTEGER 

Return  code 
0  ■  Good  return 
<0  Critical  error 
>0  Warning 

For  each  user  of  an  entity  or  an  entity  on  the  list  of  entities, 
process  by  the  user-defined  procedure.  For  each  user  processed 
without  error,  add  to  the  output  list. 
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SECTION  5 

SENERAL  UTILITIES 


This  section  contains  descriptions  of  available  general  utility  routines,  as 
shown  In  the  table  below. 


DESCRIPTION 

ROUTINE 

Get  number  of  different  KIND  values  In  the  working- form 
model . 

MAECTK 

Get  KIND  value  stored  at  specific  position  In  KIND  list. 

MAEKND 

Determine  If  an  entity  has  any  users. 

MAEUSR 

Get  actual  model  space  used  and  amount  of  model  free 
space. 

MASMSZ 

Determine  the  number  of  entitles  In  the  model  of  a 
specified  KIND. 

MAKCNT 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


MAECTK 


Get  the  number  of  different  KIND  values  In  the  working-form 
model . 

MAECTK (KNDCNT, IRC) 

INPUT: 

NONE 

OUTPUT: 

KNDCNT:  INTEGER 

The  number  of  different  KIND  values  in  the 
working-form  model. 

IRC  :  INTEGER 

The  return  code. 

Get  the  number  of  KIND  values  In  the  working-form  model  from  the 
KIND  list. 

NOTE:  Works  in  conjunction  with  MAEKND. 
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maeknd 


FUNCTION:  Get  KINO  value  at  specified  position  In  the  KINO  list. 

FORMAT:  MAEKND (KNDPOS.KNDVAL, IRC) 

INPUT: 

KNOPOS:  INTEGER 

The  position  In  the  standard  array  of  where  to  get 
the  KINO  value 

OUTPUT: 

KNDVAL:  INTEGER 

The  KIND  value  retrieved  from  the  KIND  list 

IRC  :  INTEGER 

The  return  code. 

DESCRIPTION:  Get  the  KIND  value  at  KNDPOS  In  the  KIND  list. 

NOTE:  Works  In  conjunction  with  MAECTK. 
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MAEUSR 


FUNCTION:  Determine  If  an  entity  has  any  users. 

FORMAT:  MAEUSR(KEY1,UEXIST,IRC) 

INPUT: 

KEY1  :  ENTKEY 

The  entity  whose  user  existence  Is  to  be  determined. 

OUTPUT: 

UEXIST:  INTEGER 

The  value  Indicating  If  the  entity  has  users  or  not. 
-0  No  users  exist 
-1  Users  exist 

IRC  :  INTEGER 

The  return  code. 

DESCRIPTION:  Determines  If  an  entity  has  any  users. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 


HASMSZ 
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Determine  actual  model  used  space  and  model  free  space  (In 
bytes). 

MASMSZ(MODSIZ,FRESIZ,IRC) 

OUTPUT: 

MOOSIZ  :  INTEGER 

The  total  number  of  bytes  used  by  the  model . 

FRESIZ  :  INTEGER 

The  total  number  of  bytes  of  free  space. 

IRC  :  INTEGER 

The  return  code. 

The  used  model  space  Is  calculated  by  taking  the  difference  of 
allocated  model  space  and  free  model  space.  This  routine  can 
only  be  used  where  the  MAS  memory  manager  Is  used. 
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FUNCTION: 

FORMAT: 


DESCRIPTION: 
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mm 


Determine  the  number  of  entitles  In  the  model  of  a  specified 
KIND. 

MAKCNT(KIND, COUNT, IRC) 

INPUT: 

KINO  :  INTEGER 

The  KIND  value  for  which  a  count  is  to  be 
determined. 

OUTPUT: 

COUNT  :  INTEGER 

The  number  of  entitles  In  the  model  of  the 
specified  KIND. 

IRC  :  INTEGER 

The  return  code. 

If  the  KIND  specified  is  In  the  model,  determine  the  number  of 
entitles  with  that  KIND. 
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SECUflP 

SAMPLE  PROGRAMS 

The  following  pages  Illustrate  uses  of  the  Access  Software.  These  examples 
show  Create  and  Get  operations  for  a  line. 


DESCRIPTION 

MAS  ROUTINES  USED 

Create  a  Line 

MAL,  MALATC,  MAECR,  MALD 

Get  Constituents 

MALNO,  MALGTK 

Get  Users 

MAEU,  MALNO,  MALGTK 
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Line 

Get  Users 


mw  :  armocK : 


r  «t  *«  nm  butty*) 

IMCSm  (KCYl_SM.aUMa.MCI ;■ 

.  oopuv  omr  mfomutkm 


MXT_usa am_usa  ♦  i ; 

KUM_»_US£W MMLJDC_JISai  -  1 ; 
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Lin# 

Get  Constituents 


fMW.omic«mni 

WOCWK  OUTHTi; 

VM 

wm  :  wmoci : 

mc  :  Drr_KT_aw ; 

OBTWT_ffT  :  WTKFT ; 

me  :  inner; 

«err_cwm_» :  mthkr  : 
wui»_jn_coi»inruiwr» :  wrapt : 
wm_jor_jWTA_0rT :  wraw : 


WO; 

WO; 
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CALL  MAUTOUST.ttrmni.WQ 
100  CORTMUC 

CAEATE  A  UNE  ENTITY 

CAU  MAECWAOCi  UST.  KEY.  *Q“ 

*tmc  M.  0)  SOTO  m 

OfUTt  UST 

CAU  MAUEUST.WQ  — — — 
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&EPENHICES 

mmmm 

Valuable  supplementary  Information  not  Included  earlier  In  this  manual  Is 
included  in  this  section. 

£iai 

A  ACCESS  SOFTWARE  CALLING  PARAMETER  INDEX .  A-l 

B  ALPHABETICAL  ACCESS  SOFTWARE  ROUTINE  INDEX  .  B-l 

C  ACCESS  SOFTWARE  RETURN  CODE  INDEX .  C-l 

D  ACCESS  SOFTWARE  FORTRAN  SCHEMA  DIAGRAM  .  D-l 

E  ACCESS  SOFTWARE  PASCAL  SCHEMA  DIAGRAM .  E-l 

F  GENERAL  TECHNIQUES/GUIOELINES .  F-l 

G  RUN-TIME  ENVIRONMENT  .  G-l 

INTRODUCTION .  G-l 

INTERLANGUAGE  CONVENTIONS  .  G-2 

ESTABLISHING  INTERLANGUAGE  ENVIRONMENT.  .  .  .  G-3 

REGISTER  CONVENTIONS .  G-5 

PASCAL  DYNAMIC  STORAGE  AREA  .  G-6 

EXAMPLES .  G-8 

H  ERROR  AND  WARNING  RETURN  CODE  INOEX .  H-l 


APP 
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ACCESS  SOFTWARE  CALLING  PARAMETER  INDEX 


Routing _ Description  and  calling  sequence _ Ras S. 

MAINIT  Initialize  the  working-form  model  4-5 

MAINIT  (ext_ret_code) 

MAKILL  Delete  the  current  working-form  model  4-6 

MAKILL  (ext_ret_code) 

MAECR  Create  an  entity  4-9 

MAECR  (entblock,  anykey,  entkey,  ext_ret_code) 

MAEC  Create  list  of  constituents  4-10 

MAEC  (anykey,  llstkey,  ext_ret_code) 

MAECI  Create  list  of  Inclusive  constituents  4-11 

MAECI  (anykey,  llstkey,  ext_ret_code) 

MAECIK  Create  list  of  Inclusive  constituents  by  kind  4-12 

MAECIK  (anykey,  ord_k1nd,  llstkey,  ext_ret_code) 

MAEU  Create  list  of  users  4-13 

MAEU  (anykey,  llstkey,  ext_ret_code) 

MAEUI  Create  list  of  users  Inclusively  4-14 

MAEUI  (anykey,  llstkey,  ext_ret_code) 

MAEUIK  Create  list  of  users  Inclusively  by  kind  4-15 

MAEUIK  (anykey,  ordjcind,  llstkey,  ext_ret_code) 

MAEGKN  Get  kind  value  of  an  entity  4-17 

MAEGKN  (entkey,  Integer,  ext„ret_code) 

MAEGTK  Get  entity  ADB  4-18 

MAEGTK  (entkey,  entblock,  ext_ret_code) 

MAEUD  Update  the  ADB  4-20 

MAEUO  (entkey,  entdef,  ext_ret_code) 

MAED  Delete  an  entity  or  list  of  entitles  4-24 

MAED  (anykey,  llstkey,  ext_ret_code) 

MAEDI  Delete  an  entity  or  list  of  entitles  Inclusively  4-25 

MAEDI  (anykey,  llstkey,  ext_ret_code) 

MAEDT  Delete  test  an  entity  or  list  of  entitles  4-26 

MAEDT  (anykey,  llstkey,  llstkey,  ext_ret_code) 

MAEDTI  Delete  test  an  entity  or  list  of  entitles  Inclusively  4-27 

MAEDTI  (anykey,  llstkey,  llstkey,  ext_ret_code) 

MAEDTS  Delete  test  an  entity  or  list  of  entitles  4-28 

(output  -  3  lists) 

MAEDTS  (anykey,  llstkey,  llstkey,  llstkey,  ext_ret_code) 

MAEA  Activate  an  entity  or  list  of  entitles  4-30 

MAEA  (anykey,  ext_ret_code) 

MAEAI  Activate  an  entity  or  list  of  entitles  Inclusively  4-31 

MAEAI  (anykey,  ext_ret_code) 

MAEAV  Find  value  of  entity  activation  setting  4-32 

MAEAV  (entkey,  Integer,  ext_ret_code) 
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ArfFSS  SOFTWARE  CALLING  PARAMETER  INDEX 

Routine _ Description  and  calling  sequence _ Eagg. 

MAERST  Set  application  flag  in  all  entitles  in  model  to  "off"  4-34 

MAERST  (naratyp,  ext.ret.code) 

MAQURY  Determine  value  of  application  flag  of  the  entity  4-35 

MAQURY  (entkey,  namtyp,  Integer,  ext.ret.code) 

MAUPDT  Update  value  of  application  flag  of  entity  or  4-36 

list  of  entitles 

MAUPDT  (anykey,  namtyp.  Integer,  ext.ret.code) 

MAECQY  Determine  whether  the  user  compresses  with  Its  4-37 

constituent 

MAECQY  (entkey,  entkey,  Integer,  ext_ret_code) 

MAECMP  Create  a  11st  of  constituents  which  compress  with  the  4-38 

input  entity 

MAECMP  (entkey,  llstkey,  ext.ret.code) 

MAESWA  Set  all  entitles  binary  switch  setting  to  "off"  '  4-39 

MAESWA  (ext_ret_code) 

MAESWT  Set  binary  switch  In  an  entity  or  list  of  entitles  4-40 

MAESWT  (anykey,  Integer,  ext_ret_code) 

MAESVL  Find  binary  switch  setting  of  an  entity  4-41 

MAESVL  (entkey,  Integer,  ext_ret_code) 

MALAND  "And"  of  two  lists  4-44 

MALAND  (anykey,  anykey,  llstkey,  ext.ret_.code) 

MALNOT  "Not"  of  two  lists  4-45 

MALNOT  (anykey,  anykey,  llstkey,  ext.ret  code) 

MALOR  "Or"  of  two  lists  4-46 

MALOR  (anykey,  anykey,  llstkey,  ext_.ret.code) 

MALK  Create  list  of  an  entitles  of  specified  kind  4-48 

MALK  (ord.klnd,  llstkey,  ext.ret.code) 

MALKL  Create  list  of  an  entitles  of  specified  kind  which  are  4-49 

found  within  another  list 
MALKL  (anykey,  ord.klnd,  llstkey,  ext.ret.code) 

MAL  Create  an  empty  list  4-51 

MAL  (llstkey,  ext.ret.code) 

MALN  Create  an  empty  list  of  specified  size  4-52 

MALN  (Integer,  llstkey,  ext.ret.code) 

MALCPY  Make  a  copy  of  a  list  4-53 

MALCPY  (llstkey,  llstkey,  ext.ret.code) 

MALFNO  Find  position  of  an  entity  In  a  list  4-54 

MALFND  (anykey,  entkey,  Integer,  Integer,  ext.ret.code) 

MALNO  Count  entitles  In  a  list  4-55 

MALNO  (anykey,  Integer,  ext.ret.code) 

MALGTK  Get  the  Nth  entity  from  a  list  4-56 

MALGTK  (anykey,  Integer,  entkey,  ext.ret.code) 
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Routine _ Description  end  eel  Una  sequence _ Pane 

MA10  Delete  a  list  4-58 

MALD  (llstkey,  ext_ret_code) 

MALDA  Oelete  all  lists  In  working-form  model  4-59 

MALDA  (ext_ret_code) 

MALDI  Delete  allst  and  all  lists  after  It  4-60 

MALDI  (anykey,  ext  ret.code) 

MALOCK  Set  the  list  lock  flag  4-61 

MALOCK  (llstkey,  Integer,  ext_ret_code) 

MALATC  Attach  entity  or  list  of  entitles  to  entity  or  list  4-63 

MALATC  (anykey,  anykey,  ext_ret_code) 

MALINS  Insert  entity  or  list  of  entitles  Into  a  list  4-64 

MALINS  (anykey,  anykey,  Integer,  ext_ret_code) 

MALRDE  Remove  duplicate  entitles  from  list  4-65 

MALRDE  (llstkey,  ext_ret_code) 

MALREP  Replace  a  list  of  entitles  4-66 

MALREP  (anykey,  anykey,  ext_ret_code) 

HALRHV  Remove  entity  or  list  of  entitles  4-67 

MALRMV  (anykey,  Integer,  extjret_code) 

MALROR  Reorder  a  list  of  entitles  so  that  the  users  appear 

at  the  head  of  the  list  4-68 

MALROR  (llstkey,  ext_ret_code) 

MALRPL  Replace  an  entity  4-69 

MALRPL  (anykey,  entkey.  Integer,  ext_ret_code) 

MALRVS  Reverse  order  of  list  4-70 

MALRVS  (anykey,  ext_ret_code) 

MALSRT  Sorts  an  entity  list  using  a  user  defined  function  4-71 

MALSRT  (anykey,  routine,  extjret_code) 

MALRO  Read  next  entity  In  list  4-73 

MALRD  (anykey,  entkey,  ext_ret_code) 

MALSTF  Set  flag  to  read  In  forward  direction  4-74 

MALSTF  (anykey,  ext_ret_code) 

MALSTR  Set  flag  to  read  In  reverse  direction  4-75 

MALSTR  (anykey,  ext_ret_code) 

MAEXEQ  Execute  procedure  on  an  entity  or  list  of  entitles  4-77 

MAEXEQ  (anykey,  blkdata,  routine,  ext_ret_code,  ext_ret_code) 
MAKXEQ  Execute  procedure  on  all  entitles  of  specified  kind  4-78 

MAKXEQ  (anykey,  blkdata,  routine,  ext_ret_code,  ext_ret_code) 
MALXEQ  Execute  procedure  on  entity  or  list  of  entitles  4-79 

MALXEQ  (anykey,  blkdata,  routine,  llstkey,  ext_ret_code, 
ext_ret_code) 

MAECXQ  Perform  this  procedure  on  the  constituents  of  an  entity  4-81 

or  list  of  entitles,  given  a  user  defined  function 
MAECXQ  ( 

MAEUXQ  Perform  this  procedure  on  the  users  of  an  entity  or  4-82 

list  of  entitles,  given  a  user  defined  function 
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MAECTK 

MAEKND 

MAEUSR 

MASMSZ 

MAKCNT 


ACCESS  SOFTWARE  CALLING  PARAMETER  INDEX 


_ Description and  calling  sequence _ 

Get  number  of  different  kinds  In  working-form  model 
MAECTK  (Integer,  ext_ret_code) 

Get  kind  value  at  specified  position  In  kind  list 
MAEKND  (Integer,  ordjclnd,  ext_ret_code) 

Determine  If  an  entity  has  any  users 
MAEUSR  (entkey,  Integer,  ext_ret_code) 

Find  actual  model  used  space  and  model  free  space 
MASMSZ  (Integer,  Integer,  ext_ret_code) 

Determine  number  of  entitles  In  model  of  specified  kind 
MAKCNT  (Integer,  Integer,  ext_ret_code) 


Page 

5-2 

5-3 

5-4 

5-5 

5-6 


A-4 


UM  560130001 
1  January  1987 


MAEA 

MAEAI 

MAEAV 

MAEC 

MAECI 

MAECIK 

MAECR 

MAECMP 

MAECTK 

MAECQY 

MAECXQ 

MAED 
MAEDI 
MAEDT 
MAEDT I 
MAEDTS 

MAEGKN 

MAEGTK 

MAEKND 

MAERST 

MAESVL 

MAESWA 

MAESWT 

MAEU 

HAEUO 

MAEUI 

MAEU IK 

MAEUSR 

MAEUXQ 

MAEXEQ 

MAINIT 

MAKCNT 

MAKILL 

MAKXEQ 

HAL 

MALAND 

MAIATC 

MALCPY 

MAID 

MALDA 

MAID  I 


Al  PHABETICAL  ACCESS  SOFTWARE  ROUTINE  INDEX 


_ Description _ Eas S. 

Activate  an  entity  or  list  of  entitles  4-30 

Activate  an  entity  or  list  of  entitles  Inclusively  4-31 

Find  value  of  entity  activation  setting  4-32 

Create  list  of  constituents  4-10 

Create  list  of  Inclusive  constituents  4-11 

Create  list  of  Inclusive  constituents  by  kind  4-12 

Create  an  entity  4-9 

Create  a  list  of  constituents  with  which  the  Input  4-38 

entity  compresses 

Get  number  of  different  kinds  In  working-form  model  5-2 

Determine  whether  the  user  compresses  with  Its  4-37 

constituent 

Given  a  user-defined  procedure,  perform  this  procedure  4-81 
on  the  constituents  of  an  entity  or  list  of  entitles 
Delete  an  entity  or  list  of  entitles  4-24 

Delete  an  entity  or  list  of  entitles  Inclusively  4-25 

Delete  test  an  entity  or  list  of  entitles  4-26 

Delete  test  an  entity  or  list  of  entitles  Inclusively  4-27 

Delete  test  an  entity  or  list  of  entitles  4-28 

(output  -  3  lists) 

Get  kind  value  of  an  entity  4-17 

Get  entity  ADB  4-18 

Get  kind  value  at  specified  position  In  kind  list  5-3 

Set  application  flag  In  all  entitles  In  model  to  "off"  4-34 

Find  binary  switch  setting  of  an  entity  4-41 

Set  all  entitles  binary  switch  setting  to  "off"  4-39 

Set  binary  switch  In  an  entity  or  list  of  entitles  4-40 

Create  list  of  users  4-13 

Update  entity  ADB  4-20 

Create  list  of  users  Inclusively  4-14 

Create  list  of  users  Inclusively  by  kind  4-15 

Determine  If  an  entity  has  any  users  5-4 

Given  a  user-defined  procedure,  perform  this  procedure  4-82 
on  the  users  of  an  entity  or  list  of  entitles 
Execute  procedure  on  an  entity  or  list  of  entitles  4-77 

Initialize  the  working-form  model  4-5 

Determine  number  of  entitles  In  model  with  specified  kind  5-6 
Delete  the  current  working-form  model  4-6 

Execute  procedure  on  all  entitles  of  specified  kind  4-78 
Create  an  empty  list  4-51 

"And"  of  two  list  4-44 

Attach  entity  or  list  of  entitles  to  entity  or  list  4-63 
Make  a  copy  of  a  list  4-53 

Delete  a  list  4-58 

Delete  all  lists  In  the  working -form  model  4-59 

Delete  a  list  and  all  lists  after  It  4-60 
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MALFNO 

MALGTK 

MALINS 

MALK 

MALKL 

MALM 

MALNO 

MALNOT 

MALOCK 

MALOR 

MALRD 

HALRDE 

MALREP 

MALRMV 

MALROR 

MALRPL 

MALRVS 

MALSRT 

MALSTF 

MALSTR 

MALXEQ 

MAQURY 

MASMSZ 

MAUPDT 


ALPHABETICAL  ACCESS  SOFTWARE  ROUTINE  INDEX 


- - Bftscrlptlon _ 

Find  position  of  an  entity  In  a  list 

Get  the  Nth  entity  from  a  list 

Insert  entity  or  list  of  entitles  Into  a  list 

Create  list  of  an  entitles  of  specified  kind 

Create  list  of  an  entitles  of  specified  kind  which 

are  found  within  another  list 

Create  an  empty  list  of  specified  size 

Count  entitles  In  a  list 

"Not"  of  two  lists 

Set  the  list  lock  flag 

"Or"  of  two  lists 

Read  next  entry  In  list 

Remove  duplicate  entitles  from  list 

Replace  list  of  entitles 

Remove  entity  or  list  of  entitles 

Reorder  a  list  of  entitles  so  that  the  users  appear 

at  the  head  of  the  list 

Replace  entity  or  list  of  entitles 

Reverse  the  order  of  a  list 

Sorts  an  entity  list  using  a  user  defined  function 

Set  flag  to  read  In  forward  direction 

Set  flag  to  read  In  reverse  direction 

Execute  procedure  on  entity  or  list  of  entitles 

Determine  value  of  application  flag  for  given  entity 

Find  actual  model  used  space  and  model  free  space 

Update  value  of  application  flag  of  entity  or 

list  of  entitles 


■iaflg 

4-54 

4-56 

4-64 

4-48 

4-49 

4-52 

4-55 

4-45 

4-61 

4-46 

4-73 

4-65 

4-66 

4-67 

4-68 

4-69 

4-70 

4-71 

4-74 

4-75 

4-79 

4- 35 

5- 5 
4-36 


8-2 


UH  560130001 
1  January  1987 


ACCESS  SOFTWARE  RETURN  CODE  INDEX 


Error  type  Mfi 

NO.ERRORS  DETECTED  0 
BAO.ENT  KIND  1 
INVALID  CREATE  2 
CANT_CREATE.il ST  3 
MASJNIT  FAILED  4 
INVALIDJJPDATE  5 
CANTJJPOATE  ENT  6 
CANT.CREATE  ENT  7 
CANT.VERIFY  CONNECT  8 
INVALID  CONNECTION  9 
CANT_CONNECT  10 
ABSENT  INPUT  11 
INVALID_GET  12 
NDS_OP  COMPLETE  13 
BAD_L  IMPOSITION  14 
MAXIMUM  LIST  SIZE  15 
BAD.LIST  MOVE  COUNT  16 
BAD_L I ST_RE F ERENC E  17 
BAD_ENT_KEY  18 
DUPLICATE.SCH  19 
DUMP.ERROR  20 
BAD.ENT  SIZE  21 
BAD.SCH  KIND  22 
PROC.CODE  ERROR  23 
PROC.OUT  OF.RANGE  24 
NO.MATCH  FOUND  25 
DUPS.NOT  REMOVED  26 
INVALID.DELETE  27 
BAO_ENTITY_ON  USER  LIST  28 
BAD.DELETE  KEY  29 
EMPTY  MODEL  30 
ARG.OUT  OF  RANGE  31 
INVALID  CRB.POSITION  32 
CRB.ENTRY  NOT  FOUND  33 
I NVAL I D_F  LAG_NAME  34 
CANT_MARK_ENT I TY  DELETE  35 
SIZE_NOT_CARE  ENOUGH  36 
RTS_NOT_IN_WORKING  FORM  37 
CORE.NOT  AVAILABLE  38 
NOT_ENOUGH_CORE  FOR  INIT  39 
ABSOLUTELY_NO  MORE  CORE  40 
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ACCESS  SOFTWARE  RETURN  CODE  INDEX 


Warnlna  tvoe 

Code 

OKU 

0 

NO  $UCH_SCH 

-1 

PROC  WARNING  CODE 

-2 

EMPTY  DELETE.LIST 

-3 

EMPTY~EXCEPTIONJ.IST 

-4 

END  OF  LIST 

-5 

NO  LIST  CREATED 

-6 

EMPTY  MARK  LIST 

-7 

C-2 
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GENERAL  TECHNIQUES/GUIDELINES 


o  Avoid  creating  long  lists  of  entities: 

•Lists  are  processed  sequentially 
-Lists  use  model  space 

o  Oo  not  use  ENTKEY  as  a  memory  address: 

-ENTKEY  does  not  address  the  attribute  data  block  of  the  entity 

o  Avoid  "nil"  keys: 

-Abend  or  nil  pointer  checking  errors  may  be  caused 

o  Delete  application  lists  when  no  longer  needed: 

-Application  lists  use  memory 
-Application  lists  slow  deletion  of  entitles 

o  Always  test  the  MAS  Interface  return  code: 

-RC  •  0  normal  return 

-RC  <  0  warning  message 

-RC  >  0  critical  error 

o  Reset  the  process  bit  to  "off"  when  It  is  no  longer  needed, 
o  Define  the  KIND  and  LENGTH  fields  In  the  ADB. 

o  When  MALRD  Is  used  In  conjunction  with  one  of  the  following  interface 

routines: 

MAED  MALINS 

MAEDI  MALRMV 

MAL 

the  position  of  sequential  reading  Is  Incremented/decremented  if  an 
interface  function  modifies  the  list. 

Do  not  use  MALGTK  and  one  of  the  above  routines  because  the  local  variable 
position  cannot  be  adjusted  by  the  MAS  package. 
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For  example: 

VAR  NUM_IN_LIST:  -  INTEGER 

BEGIN 


FOR  I  -  1  TO  NUM_IN_LIST  DO 

MALGTK  (LISTKEY,  NUM_IN_LIST,  ENTKEY1) : 
MAED  (ENTKEY1,  LISTX): 

END: 


As  each  entity  Is  deleted,  it  Is  removed  from  the  LISTKEY  list,  but  I 
is  not  adjusted. 

o  W5tn  the  exception  of  MAL  and  MALK,  empty  lists  will  not  be  created.  If  an 
interface  function  has  an  output  LISTKEY  and  the  list  is  empty,  the  list 
will  not  be  created  and  the  LISTKEY  will  be  NIL.  A  warning  return  code 
will  Indicate  this  situation. 
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RUN-TIME  ENVIRONMENT 


INTRODUCTION 

The  Access  Software  consists  of  a  set  of  Pascal  procedures  that  provides  an 
interface  to  the  working  form  model  for  application  programs.  When  the 
application  programs  are  written  in  a  language  other  than  Pascal,  the  run-time 
environment  must  satisfy  the  Interlanguage  communication  requirements  of  all 
the  languages  involved.  This  appendix  discusses  the  MAS  Interlanguage 
environment  conventions  and  the  composition  of  the  Pascal  dynamic  storage 
areas.  Examples  are  given  for  a  FORTRAN  program  that  uses  MAS  routines. 
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INTERLANGUAGE  CONVENTIONS 

When  the  MAS  subprograms  were  compiled,  they  were  defined  as  PROCEDURES  using 
SUBPROGRAM  declarations.  The  subprogram  declaration  Is  an  extension  to  IBM 
Pascal  that  allows  a  Pascal  procedure  to  be  called  from  any  language.  The 
subprogram  declaration  supplies  special  code  at  compile  time.  At  run-time, 
this  code  determines  the  nature  of  the  calling  program.  For  non-Pascal  calls, 
two  macros  are  invoked:  Prolog  and  Epilog.  Before  the  procedure  executes, 
Prolog  locates  the  Pascal  Communication  Work  Area  (PCWA)  as  well  as  the  main 
and  local  Dynamic  Storage  Areas  (DSA)  and  establishes  the  Pascal  register 
conventions.  On  exit,  the  Epilog  macro  restores  the  register  conventions  of 
the  calling  program. 

The  effect  of  this  method  is  that  no  special  action  Is  required  by  the  calling 
program,  regardless  of  Its  language. 

The  SUBPROGRAM  declaration  may  also  be  applied  to  application  procedures,  which 
may  then  be  called  from,  and  make  calls  to,  routines  of  any  language.  This 
method  Is  limited  to  Pascal  PROCEDURES  and  does  not  apply  to  Pascal  FUNCTIONS. 
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ESTABLISHING  INTERLANGUAGE  ENVIRONMENT 

The  preferred  (and  easiest)  approach  Is  to  Insert  the  entire  application  Into  a 
Pascal  program.  This  method  assures  correct  error  handling. 


Pascal 


FORTRAN 


Figure  G-l 
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An  alternate  approach  Is  to  Insert  the  portion  of  the  application  that  makes 
the  MAS  calls  Into  a  Pascal  procedure  that  Is  declared  MAIN.  The  error 
handling  capability,  however,  may  be  limited  In  this  method.  Note  that  the 
model  created  within  the  scope  of  the  MAIN  Pascal  procedure  Is  active  only 
during  the  execution  of  the  MAIN  procedure;  new  models  may  be  created  In 
subsequent  calls  to  a  similarly  declared  MAIN  procedure.  Upon  termination  of 
the  last  call  to  a  Pascal  MAIN,  the  procedure  PSCLHX  should  be  called  to 
terminate  the  Pascal  run-time  environment. 


Figure  G-2 


Examples  of  the  Pascal  source  and  link-edit  Instructions  are  included  at  the 
end  of  this  appendix. 
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The  Interlanguage  environment  establishes  the  correct  register  conventions 
automatically.  The  following  Information  Is  Included  for  use  from  the  IBM  TEST 
mode. 


Register 

Rascal 

Non-Rascal 

15 

Branch  address 

Branch  address 

14 

Return  address 

Return  address 

13 

Local  DSA  address  (1) 

Save  area  address 

12 

PCWA  address 

11 

Main  DSA  address 

1 

Address  of  parameter 

Address  of  parameter 

list  (2)  (3) 

list 

0 

(2) 

Function  value 

NOTES:  (1)  The  save  area  Is  the  first  entry  in  the  local  DSA,  which  is 

established  by  a  Pascal  caller. 

(2)  The  function  value  for  Pascal  Is  referred  to  by  the  first  entry 
in  the  parameter  list.  Pascal  input  parameters  for  a  function 
are  referred  to  as  starting  with  the  second  entry  in  the 
parameter  list. 

(3)  The  parameter  list  contains  addresses  of  parameters  except  for 
pass-by-value  of  scalars,  pointers,  or  sets.  In  which  case  the 
parameter  list  contains  the  actual  value. 
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PASCAL  OYNAMIC  STORAGE  AREA 

The  dynamic  storage  area  of  the  Pascal  main  program  contains  global  variables 
(Including  any  commons).  Each  Pascal  procedure  Invoked  has  a  local  dynamic 
storage  area  containing  local  variables.  The  dynamic  storage  areas  are 
contained  In  a  LIFO  stack. 

In  general,  the  DSA  of  a  routine  consists  of  five  sections: 

(1)  The  local  save  area  (144). 

(2)  Parameters  passed  In  by  the  caller. 

(3)  Local  variables  required  by  the  routine. 

(4)  A  save  area  required  by  any  routine  that  will  be  called. 

(5)  Storage  for  the  largest  parameter  list  to  be  built  for  a  call. 

Sections  1  and  2  are  allocated  by  the  calling  routine;  Sections  3,  4,  and  5  are 
allocated  by  the  Prolog  of  the  called  routine. 

Every  DSA  Is  at  least  144  bytes  long.  This  Is  the  storage  required  by 
Pascal/VS  for  a  save  area.  The  local  variables  and  parameters  of  the  routine 
are  mapped  within  the  DSA  starting  at  offset  144. 

Upon  entering  a  routine.  Register  1  points  144  bytes  into  the  DSA  of  the 
routine,  which  Is  where  the  parameters  passed  In  by  the  caller  reside. 

Upon  invocation.  Register  13  points  to  the  base  of  the  DSA  of  the  caller,  which 
is  where  the  save  area  of  the  caller  Is  located.  Figure  3  illustrates  the 
condition  of  the  stack  and  relevant  registers  immediately  upon  the  start  of  the 
routine. 
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REG  13 


— > 


To  replace 
REG  13 


•••> 


REG  1 


---> 


Top  of  stack - - 


I  I 

|  Caller’s  save  area 
1  Caller's 

j  local  variables 


Local  save  area 
(144  bytes) 


Parameters 


REG  1 
set  here 
for  calls 


— > 


Next  stack  top  - - - 


Local  variables 


Save  area 
of  aay  routines 
yet  to  be  Invoked 


Parameter  list  to 
be  built  for  calls 
to  other  routines 


Figure  G-3 


Start  of  DSA  of  caller 

Start  of  DSA  of  called 
routine 

144-bytes  into  DSA 

Storage  not  yet  to  be 
allocated 

Start  of  DSA  of  routine  yet 
to  be  called 

144  bytes  Into  this  DSA 
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E&MPLE5 

EXAMPLE  1:  PASCAL  PROGRAM  (PASMAIN)  THAT  INVOKES  FORTRAN  MAIN 


PROGRAM  PASMAIN; 
PROCEDURE  MAIN;  FORTRAN; 
BEGIN 
MAIN; 

END. 


Invoke  FORTRAN  main. 


INCLUDE  APLLIB( PASMAIN) 
INCLUDE  APLLIB(APL  ) 


INCLUDE  MASLIB(MAS  ) 
ENTRY  PASMAIN 


FORTRAN  main  object, 

list  of  objects  Including  FORTRAN  main, 
or  LOAD  module  Including  FORTRAN  main. 


where  SYSLIB  allocation  Includes  SYS1.PASCLIB. 
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EXAMPLE  2:  PASCAL  PROCEDURE  (PASSUB)  INVOKED  BY  FORTRAN  MAIN  THAT  INVOKES 
FORTRAN  SUBROUTINE  (FORSUB) 

PASCAL_PROCEDURE 
SEGMENT  PASSUB; 

PROCEDURE  PASSUB  (....) ;MAIN;  FORTRAN  MAIN  may  pass  parameters  to  the 

PASCAL  subroutine. 

PROCEDURE  PASSUB* 

PROCEDURE  FORSUB (....) {FORTRAN;  PASCAL  MAIN  may  pass  parameters  to  the 

FORTRAN  MAIN. 

BEGIN 

FORSUB(....);  Invokes  FORTRAN  subroutine  that  calls 

MAS. 

end; 

FORTRAN  MAIN  PROGRAM 


CALL  PASSUB (....) 
CALL  PSCLHX 


LINKED1TJHSTRWTIQNS 

INCLUDE  APLLIB(APL  )  List  of  objects  Including  FORTRAN  MAIN 

or  LOAD  module  Including  FORTRAN  MAIN. 

INCI  JDE  APLL IB (PASSUB) 

INCLUDE  MASLIB(MAS  ) 

ENTRY  APL 
NAME  APL 


where  SYSLIB  allocation  Includes  SYS1.PASCLIB. 
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; 


has  error  md.  mm  retvrn  cqqe  inpex 


ERROR  TYPE  CODE 


NO_ERRORS_DETECTED  0 
BAD.ENT  KIND  1 
INVALID_CREATE  2 
CANT.CREATE  LIST  3 
MAS.INIT  FAILED  4 
INVALID  UPDATE  5 
CANTJJPDATE  ENT  6 
CANT_CREATE~ENT  7 
CANT_VERIFY”C0NNECT  8 
INVALID.CONNECTION  9 
CANT_CONNECT  10 
ABSENT.INPUT  11 
INVALID  GET  12 
NDS_OP_COMPLETE  13 
BADJ.IST  POSITION  14 
MAX I MUM_L I ST_S IZE  15 
BAD_LIST_MOVE  COUNT  16 
BAD_LIST_REFERENCE  17 
BAD.ENT  KEY  18 
DUPLICATE.SCH  19 
DUMP_ERROR  20 
BAD^ENT  SIZE  21 
BAD_SCH  KIND  22 
PROC_CODE  ERROR  23 
PROC.OUT  OF  RANGE  24 
NO_MATCH~FOUND  25 
DUPS_NOT_REMOVED  26 
INVALID.DELETE  27 
BAD_ENTITY  ON  USER  LIST  28 
BAD.DELETE  KEY  ”  29 
EMPTY_MODEL  30 
ARGJJUT  OF  RANGE  31 
INVALIDlCRB  POSITION  32 
CRB_ENTRY  NOT  FOUND  33 
INVALID  FLAG  NAME  34 
CANT_MARK_ENTITY  DELETE  35 
SIZE.NOT  LARGE  ENOUGH  36 
RTS.NOT  IN  WORKING  FORM  37 
CORE.NOT  AVAILABLE”  38 
NOT.ENOUGH  CORE  FOR  INIT  39 


ERROR  TYPE  CODE 


ABSOLUTELY  NO  MORE  CORE  40 
MAINIT_ALREADY  DONE  41 
RULEJJOES  NOT  MATCH  42 
ENTITY.NOT  FOUND  LIST  43 


WARNING  TYPE  CODE 


OKW  0 

NO_SUCH_SCH  -1 

PROC^WARN I NG_CODE  -2 

EMPTY_DELETE“LIST  -3 

EMPTY  EXCEPTION  LIST  -4  ' 

END_OF_LIST  ”  -5 

NO.LIST.CREATED  -6 

EMPTY_MARK_LIST  -7 

EMPTY_MARK_N_EXCEPTION  -8 

EMPTY_DELETE_N_EXCEPTION  -9 

EMPTY  MARK  N  DELETE  -10 


t 


* 


